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MANUALE D’USO 


Introduzione 


AMSTRAD CPC6128 


Computer con disco incorporato 


Un progresso logico 


Il CPC464 ed il CPC664 AMSTRAD hanno rappresentato una base consistente per 
ulteriori sviluppi ed ora presentiamo con orgoglio il nuovo CPC6128. 


Mantenendo la nostra politica di compatibilità, il CPC6128 permette di utilizzare il 
software sia del CPC464 che del CPC664, ma è dotato di ulteriori 64K di RAM utilizzabili 
sia da CP/M che dalle applicazioni scritte dall’utente. 


CP/M Plus 


CP/M Plus (noto anche come CP/M 3.1) permette un facile accesso alla libreria di 
software CP/M 80. I61K TPA permettono di utilizzare qualunque programma scritto per 
CP/M 80. CP/M Plus è compatibile con CP/M 2.2 ma abbiamo fornito entrambe le 
versioni per assicurare che applicazioni scritte usando le caratteristiche dei sistemi 
AMSTRAD dotati del CP/M 2.2 potessero funzionare senza alcuna modifica. 


CP/M Plus comprende molti miglioramenti che aumentano le prestazioni del sistema e 
la maggior parte del software scritto per CP/M 2.2 potrà avvantaggiarsi di queste 
caratteristiche senza alcun conflitto. CP/M Plus incorpora un emulatore di terminale in 
modo che il software configurato per usare le caratteristiche dei terminali VT52 e Zenith 
Z19/Z29 possa essere installato senza bisogno di ulteriori operazioni. 


GSX 


Il sistema grafico GSX (Graphic extension system) fornito con questa versione di CP, 
M Plus permette ai programmi applicativi di indirizzare stampanti o plotter e allo schermo 
di utilizzare istruzioni standard che estendono il concetto della portabilità del software 
CP/M oltre al semplice testo sullo schermo. Il software che utilizza le caratteristiche della 
libreria GSX permette l’interfacciamento con una grande varietà di dispositivi grafici per 
permettere 1’ Hard Copy di grafici, disegni, ecc. 


Dr. LOGO 


Il linguaggio di programmazione LOGO della Digital Research continua a tracciare la 
strada nel campo dell’educazione all’uso del computer e la maggior memoria del 6128 
ha permesso di espandere il Dr.LOGO usato con CP/M 2.2. I programmi saranno 
naturalmente compatibili verso l’alto, cioè i programmi funzionanti con CP/M 2.2 
funzioneranno anche con CP/M Plus. 
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Disco 


Il CPC664 ha stabilito uno standard per i progetti successivi con il suo disco incorporato 
ed il CPC6128 continua a rendere disponibile l’elaborazione di dati con disco a tutti 
coloro che vogliono la potenza di un personal computer al prezzo di un home computer. 
I dischi dei sistemi AMSTRAD sono intercambiabili, anche se i programmi che 
utilizzano le caratteristiche di CP/M Plus e della libreria GSX non potranno essere 
utilizzati sui modelli che non possiedono tali capacità. 


Infine il CPC6128 è supportato da una delle più grandi organizzazioni nel campo 
dell’elettronica. 


Software 


Il CPC6128 permette di utilizzare tutto il software su disco per CPC664 e CPC464/DDI 1, 
e potenzialmente tutto il software su cassette per CPC464 (utilizzando naturalmente una 
unità a cassette); in tal modo l’utente avrà immediatamente una invidiabile scelta di 
software della gamma AMSTRAD o dei vari produttori indipendenti. 


AMSTRAD 


(c) Copyright 1985 AMSTRAD Plc. 


Non è possibile adattare o riprodurre in alcun modo in qualunque forma né questo 
manuale né parte di esso senza autorizzazione scritta della AMSTRAD SpA. 


Il prodotto descritto in questo manuale ed i prodotti da utilizzare con esso sono 
soggetti ad un continuo sviluppo e miglioramento. Tutte le informazioni di natura 
tecnica ed i particolari riguardanti il prodotto ed il suo uso vengono forniti da 


AMSTRAD in buona fede. Tuttavia si riconosce che in questo manuale potrebbero 
.esservi errori od omissioni. Raccomandiamo la compilazione e l’invio della scheda 
di registrazione e della garanzia. 


Si chiede inoltre di compilare ed inviare la scheda di registrazione della Digital 
Research. 


CPC 6128 Introduzione 


La AMSTRAD è lieta di ricevere commenti e suggerimenti relativi al prodotto o al 
manuale. 


Ogni operazione di manutenzione e servizio deve essere effettuata a cura dei 
rivenditori autorizzati AMSTRAD. AMSTRAD non può accettare responsabilità 
per qualunque perdita o danno causato da operazioni di manutenzione e servizio 
effettuate da personale non autorizzato. Questo manuale intende semplicemente as- 
sistere il lettore all’uso del prodotto e quindi né AMSOFT né AMSTRAD saranno 
responsabili per una qualunque perdita o danno derivanti dall’uso delle informa- 
zioni o a causa di un errore o omissione contenuti in questo manuale o ad un uso non 
corretto del prodotto. 


Dr. LOGO e CP/M sono marchi registrati della Digital Research Inc. 
Z80 è un marchio registrato della Zilog Inc. 

IBM e IBM PC sono marchi registrati della International Business Machines Inc 
Z19, Z29 e H89 sono marchi registrati della Zenith Data Systems Inc. 
VTS52 è un marchio registrato della Digital Equipment Corp. 
AMSDOS, CPC6128, CPC664 e CPC464 sono marchi registrati della AMSTRAD 


Prima pubblicazione 1985 
Quarta edizione 1987 
Edizione italiana 1988 


Curato da Ivor Spital 
Scritto da William Poel, Roland Perry, Ivor Spital e Cliff Lawson con il con: "ibuto della Locomotive Software 
Contributi di Alexander lana David Radisic, Ken Clark. 
Traduzione italiana di Marina Cabrini, Giovanna Marsilio e Paolo Poli 
Realizzato da Gruppo editoriale JCE - Via Ferri, 6 - 20092 Cinisello B. (MI) 
Fotocomposizione: Lineacomp S.r.l. - Via Ferri, 6 - 20092 Cinisello B. (MI) 
Pubblicato da AMSTRAD SpA 


AMSTRAD è un marchio registrato della Amstrad Spa. 
Un uso non autorizzato del marchio e della parola AMSTRAD è severamente proibito. 
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IMPORTANTE 


Leggere prima dell’uso ... 


Note relative all’installazione 


l. 


Si colleghi il cavo di alimentazione sempre alla presa a 3 pin seguendo le istruzioni 
contenute nella prima parte intitolata ‘Predisposizione’. 


Non si colleghi mai il sistema ad una fonte d’alimentazione diversa da 220-240V 
SOHz. 


All’interno degli apparecchi non vi sono parti che possano essere manipolate da un 
utente. Non si cerchi perciò di aprire questi apparecchi. Ogni operazione di servizio 
dovrà essere effettuata da personale qualificato. 


Per evitare disturbi agli occhi, il monitor deve essere sistemato il più lontano 
possibile dalla tastiera ed utilizzato in una stanza adeguatamente illuminata. Il 
controllo di luminosità del monitor dovrebbe essere tenuto nella posizione più bassa 
possibile. 


Il computer deve essere posto centralmente di fronte al monitor ma il più possibile 
lontano dallo schermo. Per la massima affidabilità la parte del computer contenente 
il drive per i dischi non dovrà essere posta di fronte al monitor ma alla sua destra. 
Non porre il computer vicino ad una sorgente di interferenze elettriche. 


Si tengano sempre i drive ed i dischi lontani dai campi magnetici. 


Se si utilizza un sistema a due drive, si tenga il cavo di collegamento del secondo 
drive distante dal cavo di alimentazione. 


Non bloccare o coprire i fori per la ventilazione. 


Non usare o lasciare il sistema in zone eccessivamente calde, fredde, umide o 
polverose. 


Note operative 


Non ci si preoccupi se non si comprende appieno il gergo usato in questo paragrafo; 
l’importanza di queste note diverrà chiara proseguendo nella lettura di questo manuale. 


l. 


Non accendere o spegnere mai il sistema se vi è un disco nel drive. In questo modo 
è possibile danneggiare il disco e perdere programmi e dati di grande importanza. 


Importante CPC 6128 


2. Fare sempre copie di back-up (duplicati) dei dischi che contengono programmi 
importanti. E’ in particolar modo importante fare copie dei dischi contenenti il 
sistema CP/M forniti con il CPC6128. Altrimenti, se si dovessero danneggiare tali 
dischi, la loro sostituzione potrebbe rivelarsi assai costosa. 


3. Assicurarsi di non sovrascrivere per sbaglio i dischi contenenti il sistema CP/M, 
mantenendo aperti i fori di protezione dei dischi. 


4. Sessi possiede un sistema a due drive, poiché si è acquistato un AMSTRAD FDI 
addizionale, accendere sempre il secondo disco prima del computer. 


S. Non toccare mai la superficie del disco all’interno della custodia di plastica. 
6. Nonestrarre un disco mentre si sta leggendo o scrivendo su di esso. 
7. Ricordarsi che la formattazione di un disco cancella tutti i dati contenuti su di esso. 


8. L’interfaccia interna per i dischi occupa una piccola parte di memoria utilizzata in 
alcuni casi da produttori di software per programmi basati su cassetta per 1’ AM- 
STRAD CPC464. Tali programmi non funzioneranno correttamente con l’unità a 
cassette e il 6128. Si noti tuttavia che la maggior parte dei programmi AMSTRAD 
è disponibile su disco per il CPC6128. 


9. La licenza d’uso dei dischi di sistema del CP/M (che sono numerati elet- 
tronicamente) permette il loro uso su un solo computer. In particolare ciò significa 
che è proibito dare a qualunque altra persona un disco di CP/M con il proprio numero 
codificato. Si legga attentamente la licenza d’uso del programma per l’utente finale 
riportata nell’ Appendice 1 verso la fine del manuale. 
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Contenuti 


Capitolo 1 
Corso Introduttivo 


Predisposizione 

Connessione delle periferiche 

Dischi. 

Familiarizzazione con la tastiera 
Caricamento del software e programma ‘Welcome’ 
Introduzione alle parole chiave del BASIC 
Introduzione alle operazioni con i dischi 
Modalità, colori e grafici 

Suono 

Introduzione ad AMSOFT e CP/M 
Introduzione a Bank Manager 


Capitolo 2 
Dopo i Fondamenti 


Scrittura di un semplice programma 

Evoluzione 

Uso di un vettore 

Introduzione ai menù 

Caricamento e salvataggio delle variabili su disco 
Edizione di un numero di linea 

Come rendere più nitido un programma 


Capitolo 3 
Elenco completo delle parole chiave 
del CPC6128 AMSTRAD 


Descrizione della notazione usata 
Elenco completo delle parole chiave: 
Tastiera 
Sintassi formale 
Esempio 
Descrizione 
Note speciali (dove applicabile) 
Parole chiave associate 
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Capitolo 4 
Uso di dischi e cassette 


Copie di riserva dei dischi originali 
Come iniziare l’esecuzione di CP/M Plus 
Come usare i file di aiuto (Help) 
Operazioni su drive singoli e multipli 
Copia di file 

Applicazioni BASIC dei dischi 

Uso di GSX 

CP/M 2.2 

Operazioni con le cassette 


Capîtolo 5 
AMSDOS e CP/M 


AMSDOS: 
Introduzione ad AMSDOS 
Directory su disco 
Nomi di file e tipi di file 
Caratteri jolly 
Riassunto dei comandi AMSDOS 
Trattamento e copia di file 
Guida di riferimento dei messaggi di errore 
CP/M: 
Introduzione a CP/M 
Avvio automatico di CP/M 
Modo diretto 
Programmi transienti 
Trattamento delle periferiche 
Uso di CP/M 2.2 


Capitolo 6 
Introduzione a LOGO 


Cos’è LOGO? 

Procedure di Dr.LOGO 

Modifica di programmi e procedure 
Cenni operativi 
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Riassunto delle primitive di Dr. LOGO che includono: 
Elaborazione di parole e liste 
Operazioni aritmetiche 
Operazioni logiche 
Variabili 
Procedure 
Editing 
Funzioni di stampa 
Schermo di testo 
Schermo grafico 
Grafica con la tartaruga 
Gestione dello spazio di lavoro 
Gestione liste di proprietà 
File di disco 
Tastiera e joystick 
Suono 
Flusso di controllo 
Trattamento delle eccezioni 
Primitive di sistema 
Variabili di sistema 
Proprietà di sistema 


Capitolo 7 
Riferimenti 


Locazioni del cursore ed estensioni del codice di controllo 
Interruzioni 

Caratteri grafici e ASCII 

Tasti di riferimento 

Suono 

Messaggi di errore 

Parole chiave di BASIC 

Tabelle 

Connessioni 

Stampanti 

Joystick 

Organizzazione dei dischi 

Resident System eXtension (RSX) 
Memoria 

Emulatore di terminale di CP/M Plus 
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Set di caratteri di CP/M Plus 
Capitolo 8 


Ulteriori informazioni su Bank Manager... 


Uso del secondo lotto di memoria di 64K 
Memorizzazione di immagini: 
Selezione del banco hardware 
Scambio di schermi 
Copia di schermi 
Operazioni sui pseudo-file: 
Creazione del disco RAM 
Record attuale 
Lettura, scrittura e ricerca di stringhe 
Programma di esempio dei file RAM 


Capitolo 9 
A vostra disposizione 


In senso generale: 
Il mondo dei microcomputer 
Hardware e software 
Confronto di computer 
Alcune concezioni popolari 
Come il computer tratta le istruzioni 
La parola digitale 
Bit e bytes 
I numeri del sistema BINARIO 
I numeri del sistema ESADECIMALE 
Funzioni specifiche del CPC6128: 
Set di caratteri 
Variabili 
Logica 
Caratteri definibili dall’utente 
Formato della stampa 
Finestre 
Interrupts (interruzioni) 
Dati 
Suono 
Grafica 
Grafica con il secondo lotto di 64K di memoria 
Programma Screen Designer 
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Appendici 


Appendice 1 Licenza d’uso per l’utente finale 
Appendice 2 Glossario dei termini 
Appendice 3 Alcuni programmi... 

Bustout 

Bomber 

Telly tennis 

Electric fencing 

Amthello 

Raffles 
Appendice 4 Indice 
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CAPITOLO 1 
CORSO INTRODUTTIVO 


Parte 1: Predisposizione ... 


Il personal computer CPC6128 può essere collegato ad uno dei seguenti dispositivi: 
1. Un monitor a fosfori verdi GT65 AMSTRAD 


2. Un monitor a colori CTM644 AMSTRAD 
3. Un Modulatore/Alimentatore MP2 AMSTRAD fornito da un ricevitore TV domestico. 


Come inserire la spina di alimentazione 


Il CPC6128 funziona con una tensione di alimentazione di 220-240 Volt, 50 Hz C.A.. 
Importante 


Quando il sistema non è in uso si estragga la spina dalla presa. 

Non occorre fare connessioni interne, quindi non si cerchi di accedere all’apparecchiatura 
interna. Attenersi sempre ai messaggi di attenzione sull’etichetta situata sotto il CPC6126 
e l’MP2, e sul retro del GT65 e del CTM644: 


ATTENZIONE! ALTA TENSIONE. NON RIMUOVERE ALCUNA VITE 
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Connessione del computer al monitor 


Nel caso si stia usando il CPC6128 con Modulatore/Alimentatore MP2 si salti al prossimo 
paragrafo. 


1. Cisiassicuri che il monitor non sia collegato alla presa di alimentazione. 


2. Si connetta il capo della presa più larga situata in fronte al monitor con la presa 
MONITOR situata sul retro del computer. 


3. Siconnetta il capo della presa più piccola situata in fronte al monitor nella presa 5V 
DC sul retro del computer. 


4. Si connetta il capo della presa situata sul retro del computer (12V DC) nella presa 
situata in fronte al monitor. 


pannello posteriore 
del computer 


Fronte del monitor 
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Connessione del computer ad un 
Modulatore/Alimentatore MP2 AMSTRAD 


MP? è un oggetto addizionale che si potrebbe voler acquistare nel caso si stia usando il 
computer CPC6128 con uno schermo a monitor verdi GT65. L’MP2 permette di usare il 
computer con un normale televisore a colori e tutte le caratteristiche di colore del proprio 

CPC6128. 


L’MP2 deve essere posizionato alla destra del CPC6128. 


1. 


Di 


alla presa d’antenna 
del televisore. 


Ci si assicuri che 1’ MP2 non sia collegato alla presa di alimentazione. 


Si connetta il capo della presa più larga dell’ MP2 con la presa MONITOR situata 
sul retro del computer. 


Si connetta il capo della presa più piccola dell’ MP2 nella presa 5V DC sul retro del 
computer. 


Si connetta la presa dell’antenna televisiva dell’MP2 alla presa d’antenna del 
proprio televisore. 


Si connetta il capo della presa situata sul retro del computer (12V DC) nella presa 
situata sul retro dell’MP2. 


retro del modulatore 


alimentazione. alimentatore MP2 
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Accensione del CPC6128 e del sistema GT65/CTM644 


Nel caso si stia usando il CPC6128 con Modulatore/Alimentatore MP2 si salti al prossimo 
paragrafo. 


Dopo aver connesso il sistema come spiegato precedentemente, si colleghi la spina nella 


presa di alimentazione. Si prema il pulsante POWER situato nell’angolo in alto a destra 
del monitor in modo sia posto in posizione IN. 


Si accenda ora il computer usando il commutatore POWER situato sul retro. 


L’indicatore rosso in alto a destra della tastiera deve essere acceso e il monitor 
visualizzerà: 


Amstrad 128K Microcomputer (v3) 


©1985 Amstrad Consumer Electronics plc 
and Locomotive Software Ltd. 
BASIC 1.1 


Ready 
I 


Perevitare di sottoporre gli occhi ad inutile tensione si regoli il controllo BRIGHTNESS 
(luminosità) affinché visualizzi la luminosità accettabile per una vista confortevole senza 
abbagliamento e scrittura poco chiara. 


Il controllo della luminosità BRIGHTNESS è situato sul pannello frontale del GT65 o 
sulla destra del CTM644. 


Nel caso si stia usando il monitor a fosfori verdi GT65 occorrerà regolare il contrasto 


(CONTRAST) ed il controllo di sincronismo verticale (Vertical HOLD) del pannello 
frontale. 


Occorre inoltre regolare il controllo CONTRAST (contrasto) al minimo affinché renda 
confortabile la vista. 


Il controllo verticale del GT65 contrassegnato V-HOLD deve essere regolato affinché la 
visualizzazione sia correttamente posizionata in centro allo schermo, senza sfarfallii o 
rotazioni. 
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Accensione del CPC6128 e del 
Modulatore/Amplificatore MP2 


Dopo aver connesso il sistema come spiegato precedentemente, si colleghi la spina nella 
presa di alimentazione. 


Si accenda ora il computer usando il commutatore POWER situato sul retro. 


L’indicatore rosso in alto a destra della tastiera deve essere acceso (ovvero essere in 
posizione ON) e il televisore deve essere predisposto a ricevere il segnale dal computer. 


Se si possiede un televisore con selezione di canali a pulsanti si selezioni un canale 
disponibile. Si predisponga il canale in modo che riceva il segnale dal computer in base 
alle istruzioni del manuale d’uso del televisiore (il segnale sarà situato vicino al canale 
36) fino a quando non si vedrà visualizzato il seguente messaggio: 


Amstrad 128K Microcomputer (v3) 


©1985 Amstrad Consumer Electronics plc 
and Locomotive Software Ltd. 
BASIC 1.1 


Ready 
| 


Si metta a punto la visualizzazione dello schermo in modo che sia ben chiaro ciò che è 
scritto. Si dovrà ottenere una scritta gialla su sfondo blu. 


Se il televisore che si possiede ha un leva rotante per la selezione dei programmi la si ruoti 
fino ad ottenere uno schermo chiaro e perfettamente fermo (verso il canale 36). 
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Altre connessioni ... 


E’ possibile inoltre connettere al proprio sistema altre periferiche: 


Joystick 

Unità a cassette 

Stampante 

Secondo drive 
Amplificatore/altoparlanti esterni 
Espansione 


per i dettagli si consulti la seconda parte di questo corso introduttivo. 


Si controlli inoltre di aver seguito attentamente le istruzioni fornite all’inizio di questo 
manuale, nel paragrafo intitolato ‘IMPORTANTE’: 


NOTE DI INSTALLAZIONE 1,2,4,5,6,7,8 
NOTE OPERATIVE 1 
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Parte 2: Connessione di periferiche ... 


Questo paragrafo spiega come connettere diverse periferiche al CPC6128. Le spiega- 
zioni ed i dettagli dell’uso di queste periferiche si troveranno all’interno del manuale nei 
paragrafi specifici. 


Joystick 


Il joystick AMSTRAD modello JY2 è un oggetto addizionale che si può acquistare se si 
vogliono usare con CPC6128 i giochi elettronici. 


Il joystick JY2 deve essere collegato alla presa JOYSTICK del proprio computer. E’ 
possibile, inoltre, collegare al CPC6128 Amstrad due joystick: il secondo joystick JY2 
deve essere collegato nella presa del primo. 


Il joystick AMSTRAD modello JY1 è adatto ad essere usato con questo computer. 


Ulteriori informazioni sui joystick saranno reperibili successivamente nel manuale. 
Unità a cassette 


I programmi possono essere caricati e salvati su cassette invece che su disco. I comandi 
che servono ad effettuare una tale operazione verranno indicati successivamente. 


Per connettere una unità a cassette al computer 6128 è necessario avere un cavo di 
connessione standard . 


Si connetta il capo della presa più larga (5 DIN) nella presa del computer contrassegnata 


TAPE. 


Si inserisca la spina del cavo Blu nella presa dell’unità cassette contrassegnata REMOTE 
o REM. 


Si inserisca la spina del cavo Rosso nella presa dell’unità cassette contrassegnata MIC, 
COMPUTER IN o INPUT. i 


Si inserisca la spina del cavo Bianco nella presa dell’unità cassette contrassegnata EAR, 
COMPUTER OUT o OUTPUT. 
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E’ importante ricordare che il corretto trasferimento di dati tra il 6128 e la cassetta dipende 
in gran parte dall’esatta regolazione del livello (LEVEL) o controllo di volume (VOLU- 
ME) dell’unità cassette. Nel caso il caricamento o il salvataggio di un programma non sia 
avvenuto correttamente si provi ad usare una posizione diversa di controllo LEVEL 
facendo diversi tentativi fino a quando non si trovi quella esatta. 


Stampante 


Il CPC6128 può essere connesso ad una qualsiasi stampante parallela compatibile 
Centronics. Se si intende connettere al CPC6128 una stampante AMSTRAD si usi 
semplicemente il cavo fornito con quest’ultima. 


Nel caso si volesse collegare una stampante parallela Centronics compatibile sarà 
necessario procurarsi un cavo di connessione . 


Si connetta il capo della spina più larga alla presa contrassegnata PRINTER situata sul 
retro del computer. 


Si connetta l’altro capo collegato alla presa Centronics nella presa situata sul retro del 
computer. Se la stampante possiede dei gancetti di sicurezza sulla presa questi possono 
essere chiusi. 


I dettagli relativi alle operazioni di stampa verranno indicati successivamente nel corso 
del manuale. 


Secondo drive (AMSTRAD FD1) 


L’AMSTRADEDI può essere collegato al sistema come secondo drive. I vantaggi di un 
sistema a due drive saranno evidenti per gli utenti di CP/M poichè molti programmi sono 
stati configurati per eseguire i programmi di libreria di un disco inserito. in un drive e 
memorizzare i file di dati nel secondo drive. 


Le operazioni in ambiente CP/M richiedono sempre che i programmi vengano caricati dal 
disco (non vi è accesso al ROM BASIC). Poichè CP/M permette l’uso di file multipli 
mediante una tecnica di sovrapposizione che consente di avere programmi più grandi 
della memoria RAM, il disco di libreria attuale può contenere così tanti file di programma 
che rimane poco spazio di lavoro per i dati. 


Grazie alla versatilità di utilità fornite con il disco di sistema del CPC6128 è possibile 
effettuare tutte le operazioni di manutenzione dei file: copia, cancellazione, ecc. su un 
drive. Un secondo drive comunque aumenterà sicuramente tali processi e ridurrà gli 
errori. 


Per connettere l’FD1 al CPC6128 sarà necessario procurarsi un cavo di connessione . 
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Si connetta la spina più larga del cavo nella presa DISC DRIVE 2 situata sul retro del 
computer. 


Si connetta l’altro capo del cavo nella presa del drive FDI. 


DA NON DIMENTICARE: prima di connettere o scollegare il secondo drive, ci si 
assicuri che i dischi siano stati rimossi dai drive e che il sistema sia spento. Se, mentre il 
sistema era acceso, si sono modificate le connessioni, è come se il programma residente 
in memoria si fosse alterato. E’ necessario salvare sempre il programma prima di 
manipolare le connessioni. 


Quando l’FDI è connesso al CPC6128 occorre accendere PRIMA l’FDI usando il 
commutatore situato nel pannello sul retro del drive e QUINDI accendere quello del 
computer. Sia l’indicatore rosso che quello verde situato sul pannello frontale dell’FDI1 
devono essere illuminati. Il secondo drive di sistema è pronto per operare. 


I dettagli operativi relativi al secondo drive verranno indicati successivamente nel corso 
del manuale. 


Amplificatore/altoparlanti esterni 


Il CPC6128 può essere connesso ad un amplificatore stereo e agli altoparlanti al fine di 
sfruttare al meglio le capacità del computer. 


Il cavo di ingresso dell’amplificatore stereo deve terminare con uno spinotto jack di 
3,5mm che deve essere inserito nella presa STEREO del computer. 


Le connessioni dello spinotto sono: 


Cima - canale sinistro 
Anello intermedio - canale destro 
Contatto posteriore - massa 


Il CPC6128 fornirà in uscita un segnale fisso alla presa STEREO e perciò si dovranno 
usare i controlli dell’amplificatore stesso per regolare il volume, il bilanciamento ed il 
tono. 


Sarà possibile utilizzare con il 6128 anche cuffie ad alta impedenza, tuttavia non è 


possibile utilizzare il controllo di VOLUME del computer per regolare il volume in 
cuffia. 


I dettagli riguardanti l’invio del suono sul canale di uscita desiderato si troveranno 
successivamente nel manuale. 
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Espansione 


E° possibile connettere al CPC6128 periferiche come interfacce seriali, modem, penne 
ottiche, ROM, ecc. mediante la presa EXPANSION situata sul retro del computer. 


L’interfaccia seriale AMSTRAD RS232C può essere connessa a tale presa così come il 
sintetizzatore/amplificatore AMSTRAD. 


Ulteriori informazioni sulle connessioni alla presa EXPANSION saranno reperibili nel 
capitolo ‘Riferimenti ...’. 


Si controlli inoltre di aver seguito attentamente le istruzioni fornite all’inizio di questo 
manuale, nel paragrafo intitolato ‘IMPORTANTE’: 


NOTE DI INSTALLAZIONE 6,7 
NOTE OPERATIVE 4,8 
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Parte 3: I dischi ... 


Il CPC6128 AMSTRAD usa dischetti da 3 pollici. Si raccomanda vivamente l’utente di 
utilizzare solo i dischetti di tipo CF2. E’ comunque possibile usare dischetti di altre case 
produttrici purchè di ottima marca. 


Inserimento 


Ogni lato del disco può essere usato separatamente. Il disco deve essere inserito 
all’interno del drive con il lato contenente l’etichetta mantenuto all’esterno e con 
quest’ultima rivolta verso l’alto: 
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Protezione da scrittura 


Nell’angolo in alto a sinistra di ogni lato di un dischetto si potrà vedere una piccola freccia 
che indica un foro coperto da un quadrato di plastica. Questo è il foro di protezione dalla 
scrittura e serve a proteggere da cancellazioni o ‘riscritture’ involontarie: 


Foro di protezione dalla scrittura 


Quando tale foro è chiuso i dati possono essere ‘scritti’ dal computer sul disco. Nel caso 
in cui tale foro sia aperto il disco non permette che i dati vengano scritti: in tal modo si 
potranno evitare cancellazioni involontarie di programmi importanti. 


I dischi di diverse case produttrici potrebbero avere meccanismi diversi di protezione 
dalla scrittura. Le operazioni da effettuare sui dischetti CF2 sono i seguenti: 


Per aprire il foro di protezione dalla scrittura si faccia scivolare verso il basso il piccolo 
quadrato di plastica situato nell’angolo in alto a sinistra del disco; il foro sarà aperto. 


Foro di protezione dalla scrittura (APERTO) À 

' 

' 

Otturatore ii / | 
APERTO 


Protezione dalla scrittura attiva Protezione dalla scrittura non attiva 


U (iz 


Per chiudere il foro di protezione dalla scrittura si faccia scivolare il quadrato di plastica 
in senso contrario (fino a quando il foro non è chiuso). 
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Altri dischetti usano una piccola leva di plastica situata in una guida nell’angolo in alto 
a sinistra: 


levetta 


Foro di protezione 
dalla scrittura 
(CHIUSO) 


Peraprire una protezione su un tale tipo di disco si faccia scivolare la levetta verso il centro 
del disco usando la punta di una penna o un oggetto analogo: 


Far scivolare la levetta 
verso il centro del disco 


Foro di protezione 
dalla scrittura 
(APERTO) 


Si noti che in qualunque metodo di protezione dalla scrittura l’apertura del foro implica 
la protezione da scrittura. 


IMPORTANTE 


Ci si assicuri sempre che il foro di protezione di scrittura dei dischetti di sistema CP/M 
sia aperto. 
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Quando i dischi sono inseriti 


Nel pannello frontale del drive del proprio computer si potrà vedere un indicatore 
luminoso rosso ed un pulsante di estrazione: 


Indicatore Pulsante 
luminoso di estrazione 


Indicatore luminoso 


Indica che il computer sta leggendo o scrivendo dati sul disco. 
Se il secondo drive è connesso, l’indicatore luminoso di quest’ultimo (Drive B) sarà 


costantemente acceso. Esso si spegnerà quando il drive principale all’interno del 
computer (Drive A) sta leggendo o scrivendo su disco. 


Pulsante di estrazione 


La pressione di tale pulsante fa sì che sia possibile estrarre il disco dal drive. 


Si controlli inoltre di aver seguito attentamente le istruzioni fornite all’inizio di questo 
manuale, nel paragrafo intitolato IMPORTANTE”: 


NOTE OPERATIVE 1,3,4,5,6 
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Parte 4: Iniziamo ... 


Prima di iniziare a caricare e salvare programmi su disco è bene familiarizzare con alcuni 
tasti presenti sul computer. Gli utenti già esperti possono saltare la lettura di questo 
paragrafo. 


Con il computer acceso e con il messaggio iniziale presente sullo schermo proviamo ad 
usare diversi tasti ... 


I tasti cursore î Ue + (nell’angolo in alto a destra della tastiera) spostano il cursore (il 
piccolo quadrato) nello schermo. 


Premendo uno alla volta ciascun tasto si vedrà il cursore muoversi nello schermo. 


Il tasto [RETURN] inserisce le informazioni scritte nel computer. Dopo aver premuto 
tale tasto si inizia una nuova linea. Ogni istruzione inserita deve essere seguita dalla 


pressione da parte dell’utente del tasto [RETURN]. 


Da questo momento in poi, ogni volta che verrà indicato [RETURN] si intenderà la 
pressione di tale tasto dopo ogni istruzione o linea di programma. 
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ENTER 


In circostanze normali (per difetto) questo tasto ha lo stesso effetto del tasto [RETURN] 
e può essere quindi usato in luogo di questo. Comunque, così come i tasti del tastierino 


numerico anche il tasto [ENTER] può essere ri-definito per altri usi. Ciò verrà spiegato 
successivamente in maggior dettaglio in questo manuale. 


DEL 


Questo tasto è usato per cancellare sullo schermo il carattere a sinistra del cursore (ad 
esempio una lettera o un numero). 


Si scriva a b C di; si potrà notare che la lettera d è situata alla destra del cursore. Se si vuole 


cancellare tale lettera si prema una volta il tasto [DEL]: la lettera d verrà cancellata. Se 
si continua a mantenere premuto tale tasto anche le lettere a b e C verranno cancellate. 


SHIFT 


Vi sono due tasti [SHIFT]. Se si preme uno dei due e lo si mantiene premuto mentre si 
preme un tasto sullo schermo apparirà una lettera maiuscola o il segno più in alto su un 
tasto che ne contiene due. 


Si scriva la lettera e poi si mantenga premuto il tasto [SHIFT] e si scriva nuovamente tale 
lettera. Sullo schermo apparirà: 


e E 


Si scrivano ora alcuni spazi premendo la barra spazi. Si provi ad usare uno dei tasti 
contrassegnati da numeri della prima linea della tastiera. Si scriva il numero 2 poi, 
mantenendo premuto il tasto [SHIFT] si scriva di nuovo tale tasto. Sullo schermo si 
vedrà: 


N 


Si provi a premere uno qualunque dei tasti da solo o con il tasto [SHIFT]. 
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CAPS 


Questo tasto ha una azione simile al tasto [SHIFT] ma questo va premuto una sola volta. 
Con tale tasto premuto tutte le lettere inserite verranno scritte in maiuscolo mentre i tasti 
contrassegnati con numeri verranno scritti uguali (non viene cioè scritto il segno situato 
sopra il numero). 


Si prema [CAPS LOCK] e si scriva: 
abcdef1234567 
sullo schermo si vedrà: 


ABCDEF1234567 


Si sarà notato che tutte le lettere sono state scritte in maiuscolo mentre invece di scrivere 
i simboli sopra i numeri sono stati scritti questi ultimi. Nel caso si vogliano scrivere i 
simboli sopra i numeri mentre è premuto il tasto [CAPS LOCK], occorre premere il tasto 
[SHIFT]. Si provi a scrivere la seguente sequenza mantenendo premuto il tasto [SHIFT]: 


abcdef123456 
Sullo schermo si vedrà: 
ABCDEF!”’#$%& 


Per tornare in modalità minuscola si prema una volta il tasto [CAPS LOCK]. 


Se si desiderano scrivere tutti i tasti in maiuscolo e nel contempo anche i simboli situati 


sopra i numeri senza dover mantenere costantemente premuto il tasto [SHIFT] è possibile 
premere insieme: 


CONTROL Sh 


Mantenendo premuto il tasto [CONTROL] si prema una volta il tasto [CAPS LOCK]. 
Si scriva ora: 


abcdef123456 
Sullo schermo si vedrà: 


ABCDEF!"#$%& 


Si noti che, mentre è attivo [CONTROL] [CAPS LOCK] è comunque possibile scrivere 
i numeri usando i tasti funzione (da f0 a f9) situati sulla destra della tastiera. 
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Mantenendo premuto il tasto [CONTROL] e premendo [CAPS LOCK] si ritorna nella 
precedente modalità (ovvero lettere minuscole o solo lettere maiuscole). Se si è tornati 


in modalità solo lettere maiuscole si prema una volta [CAPS LOCK] per tornare in 
modalità minuscola. 


CLR 


Questo tasto serve a cancellare il carattere su cui è posizionato il cursore. 


Si scriva A BC DEF GH. Il cursore sarà posizionato alla sinistra dell’ultimo carattere 
immesso (H). Si prema ora il tasto freccia a sinistra quattro volte. Il cursore sarà ora 
posizionato sulla lettera E. 


Si noti che la lettera E è comunque visibile. Si prema il tasto [CLR] una volta: si vedrà 
che la lettera E è stata cancellata, le lettere FG H si sono spostate di uno spazio a sinistra 
e la lettera F è ora posizionata dentro il cursore. Si prema ora il tasto [CLR] e lo si 
mantenga premuto. Si vedrà che la lettera F e successivamente la G e la H verranno 
cancellate. 


ESC 


Questo tasto è usato per abbandonare una funzione che il computer sta eseguendo. 


Premendo una volta il tasto [ESC] si provocherà una momentanea sospenzione di tale 
funzione la quale verrà ripresa quando si premerà un qualsiasi tasto. 


Premendo invece tale tasto due volte si provocherà l’interruzione definitiva della 
funzione in corso. Il computer è a questo punto pronto a ricevere ulteriori istruzioni. 


Importante 


Quando si raggiunge il lato destro dello schermo inserendo su una linea 40 caratteri, il 
carattere successivo apparirà automaticamente sul lato sinistro della linea successiva. Ciò 
significa che NON si deve necessariamente premere [RETURN] quando si raggiunge la 
fine della linea, come si dovrebbe fare invece su una macchina da scrivere. 


Il computer va a capo automaticamente, quindi nel caso si includa un [RETURN] non 
necessario esso stamperà un messaggio di errore (solitamente Syntax error) in fase di 
esecuzione del programma. 
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Errori di sintassi 


Se sullo schermo appare il messaggio: "Syntax error"significa che il computer non 
comprende una istruzione inserita. Ad esempio, si inserisca: 


printt [RETURN] 


“ Nello schermo apparirà il messaggio: 


Syntax error 


Il messaggio appare perchè il computer non ha compreso l’istruzione printt. Se si 
commette un errore in una linea di programma, come in: 


10 printt “abc” [RETURN] 


Il messaggio Syntax error non apparirà finchè l’istruzione non verrà esaminata dal 
computer durante l’esecuzione del programma. 


Si immetta: 
run [RETURN] 


(Questo comando indica al computer di eseguire il programma inserito in memoria). 
Sullo schermo apparirà: 


Syntax error in 10 
10 [grintt “abc” 


Questo messaggio indica la linea in cui è capitato l’errore e visualizza la linea di 
programma ed il cursore per permettere di correggerla. Si prema il tasto “cursore a destra” 
[->] fino a portare il cursore sulla lettera t, quindi si prema il tasto [CLR] per cancellare 
la lettera ed il tasto [RETURN] per immettere la linea corretta. 


Si immetta: 
run [RETURN] 
... € si noterà che il computer ha accettato la linea ed ha stampato abc 


Si controlli inoltre di aver seguito attentamente le istruzioni fornite all’inizio di questo 
manuale, nel paragrafo intitolato ‘IMPORTANTE’: 


NOTE DI INSTALLAZIONE 4,5 
NOTE OPERATIVE 1 
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Parte 5: Caricamento di software e 
giochi... 


Benvenuti a tutti coloro che hanno saltato la parte precedente! 


Come veloce dimostrazione della velocità di caricamento di software da disco, si accenda 
il computere si inserisca il lato 4 (Side 4) del pacchetto CP/M fornito nel drive (l’etichetta 
Side 4 deve cioè essere rivolta verso l’alto). 


Si scriva: 
dem 
run “rointime.dm” [RETURN] 


Dopo pochi secondi il programma verrà caricato in memoria. Dopo aver risposto alla 
domanda posta sullo schermo che chiede se si sta usando un monitor a fosfori verdi, (si 


scriva Y per Sì e N per No) si vedrà sullo schermo una dimostrazione del gioco ‘Roland 
in Time”. Potrebbe persuadere l’utente ad acquistare una copia del gioco! 


Dopo aver visto il programma dimostrativo è possibile fermare tale visione mantenendo 
premuti contemporaneamente i tasti [CONTROL] e [SHIFT] e premendo il tasto [ESC]. 
Questa azione comporta il riavvio completo del computer e può essere fatto in qualsiasi 
momento si voglia pulirne la memoria (non occorre estrarre alcun disco dal drive quando 
si riavvia in tal modo il computer). 


Se il programma non è stato caricato proviamo ad analizzare il possibile messaggio che 
appare sullo schermo: 


Drive A: disc missing 
Retry, Ignore or Cancel? 


... non si è inserito correttamente il disco o, nel caso si possiedano due drive, che lo si è 
inserito nel Drive B. 


ROINTIME.DEM not found 


... SÌ è inserito il disco sbagliato (o il lato sbagliato del disco) o non si è scritto in modo 
esatto il nome, ROINTIME.DEM 


Bad command 


... probabilmente si è sbagliato a scrivere ROINTIME.DEM inserendo uno spazio o un 
simbolo di punteggiatura. 
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Type mismatch 


.. sì sono omesse le virgolette “ 


Syntax error 


... SI è sbagliato a scrivere la parola run 


Drive A:read fail 
Retry, Ignore o Cancel? 


.. il computer non è riuscito a leggere i dati dal disco. Si controlli di aver inserito 


correttamente il disco e si prema R per Riprovare (Retry). Questo messaggio apparirà 
nuovamente nel caso si sia danneggiato il disco accendendo o spegnendo il computer con 
tale disco inserito nel drive. 


Una volta appreso come effettuare copie di riserva dei dischi è buona norma farle per tutti 
i programmi ed in modo particolare per i dischi di sistema di CP/M. 


Caricamento del software AMSTRAD e del programma 
WELCOME 


Dopo aver stimolato la curiosità dell’utente nei confronti della programmazione, cari- 
chiamo un gioco ... 


Si inserisca il disco contenente il software nel drive e si scriva: 
run4disc'' [RETURN] 


Dopo pochi secondi verrà caricato il gioco e si potrà iniziare a giocare. 


Si provi a scrivere, con il lato 4 (Side 4) del disco di sistema CP/M inserito nel drive, run 
“disc”; si potrà vedere e sentire il programma dimostrativo ‘Welcome’. 
Dopo aver visto tale programma si riavvi il computer usando i tasti 


[CONTROLI][SHIFT] e [ESC]. 


L’istruzione precedente (run “disc”) carica la maggior parte del software, ma occorrerà 
a volte scrivere qualcos’altro. In tutti i casi comunque, si potranno trovare le istruzioni 
di caricamento sull’etichetta del disco le quali devono essere seguite scrupolosamente. 


Si controlli inoltre di aver seguito attentamente le istruzioni fornite all’inizio di questo 
manuale, nel paragrafo intitolato ‘IMPORTANTE: 


NOTE DI INSTALLAZIONE 6 
NOTE OPERATIVE 1,5,6 
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Parte 6: Programmiamo ... 


Fino ad ora abbiamo visto cosa è possibile e cosa non è possibile fare con il computer e 
come predisporre e connettere le periferiche. Sappiamo come operano alcuni tasti e come 
caricare programmi. Guardiamo ora qualche istruzione e scriviamole per vedere cosa 
accade ... 


Come tutti, il computer può comprendere solo le istruzioni in un linguaggio che conosce: 
tale linguaggio è il BASIC (abbreviazione di Beginners’ All-purpose Symbolic Instruc- 
tion Code). Le parole di un vocabolario di BASIC sono dette ‘parole chiave’ ed ognuna 
di queste indica al computer di eseguire una particolare funzione. Tutti i linguaggi devono 
essere conformi a regole grammaticali e BASIC non fa eccezione. In questo contesto la 
grammatica viene detta ‘Sintassi’ e il computer sarà sempre pronto ad indicare che si è 
fatto un Syntax error (errore di sintassi)! 


Introduzione alle parole chiave del BASIC AMSTRAD. 


Nel capitolo ‘Lista completa delle parole chiave di BASIC del CPC6128 AMSTRAD’ 
viene riportata una descrizione illustrata di tutte le parole chiave del BASIC utilizzate dal 
BASIC AMSTRAD. In questa parte introduciamo alcune delle parole chiave più usate. 


CLS 


Per cancellare lo schermo si scriva: 


cls [RETURN] 


(cancella schermo). Lo schermo verrà cancellato e nell’angolo in alto a sinistra dello 
schermo apparirà la parola Ready (Pronto) ed il cursore. 


Si noti che è possibile usare per le parole chiave di BASIC sia le minuscole che le 
maiuscole. 


PRINT 


Questa parola chiave viene usata quando si vogliono stampare sullo schermo caratteri, 
parole o cifre. Si immetta la seguente linea: 


print “ciao” [RETURN] 
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Sullo schermo apparirà: 


ciao 

Le doppie virgolette “’” vengono usate per indicare al computer ciò che deve essere 
stampato. Ciao apparirà sullo schermo non appena si premerà il tasto [RETURN]. Si 
scriva ora: 


cls [RETURN] 


... per cancellare lo schermo. 
RUN 


L’esempio precedente mostrava una sola linea di istruzione. Quando comunque si è 
premuto [RETURN] l’istruzione è stata eseguita ma immediatamente dimenticata. E” 
possibile memorizzare una serie di istruzioni da eseguire in un ordine stabilito. Ciò si 
ottiene scrivendo un ‘programma’. L’ordine delle istruzioni di BASIC inserite nel 
programma è lo stesso di quello visualizzato, ma all’inizio di ogni riga vi è un numero. 
Se nel programma vi è più di una linea questi numeri indicano al computer in quale ordine 
si deve eseguire il programma. Quando si preme il tasto [RETURN] la linea viene 
memorizzata dal computer fino all’esecuzione del programma. Si scriva: 


10 print “ciao” [RETURN] 
Si noterà che alla pressione del tasto [RETURN] NON verrà stampato ciao sullo 


schermo, perchè viene inserita nella memoria la linea di programma. Per eseguire tale 
programma occorre infatti immettere la parola run. Si scriva: 


run [RETURN] 


Ora apparirà la parola ciao sullo schermo. Al posto di print è possibile usare il simbolo 
?, come in: 


10 ? “ciao” [RETURN] 
LIST 


Dopo che un programma è stato memorizzato, è possibile verificare ciò che è stato 
inserito guardando il listato del programma. Si scriva: 


list [RETURN] 


Sullo schermo apparirà: 


10 PRINT “ciao” 


.. che è il programma memorizzato. 
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Si noterà che la parola PRINT è in maiuscolo. Ciò significa che il computer ha 
riconosciuto PRINT come parola chiave del BASIC. 


Si scriva ora: cls [RETURN] per cancellare lo schermo. Sebbene lo schermo venga 
cancellato, il programma resta nella memoria del computer. 


GOTO 


La parola chiave GOTO indica al computer di “saltare” da una linea all’altra, per evitare 
l’esecuzione di un certo numero di linee o per formare un ciclo. Si immetta: 


10 print “ciao” [RETURN] 20 
goto 10 [RETURN] 


Poi: 
run [RETURN] 


... © la parola ciao verrà scritta ripetutamente sulla sinistra dello schermo. Ciò avviene 


perchè la linea 20 di tale programma indica al computer di saltare alla linea 10 e di 
continuare l’esecuzione da quel punto. 


Per fermare l’esecuzione del programma, si prema il tasto [ESC]. Per riprenderla si 
prema un qualunque altro tasto. Per fermare definitivamente l’esecuzione, si prema due 


volte il tasto [ESC]. 
Si scriva: 
cls [RETURN] 


.. per cancellare lo schermo. 


Per vedere le parole ciao stampate una in fianco all’altra, linea per linea, fino al 
riempimento completo dello schermo, si utilizzi lo stesso programma ma con un punto 
e virgola (;) dopo le ultime virgolette (°). Si immetta: 


10 print “ciao”; [RETURN] 
20 goto 10 [RETURN] 
run [RETURN] 


Si sarà notato che il punto e virgola indica al computer di stampare il prossimo carattere 
immediatamente dopo il precedente (a meno che il gruppo seguente di caratteri sia troppo 
lungo per starci sulla stessa linea). 
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Si termini il programma premendo due volte il tasto [ESC]. Ora si reimmetta la linea 10 
con una virgola (,) al posto del punto e virgola (;). 


10 print “ciao”, [RETURN] 
run [RETURN] 


Si noterà che la virgola indica al computer di stampare il prossimo carattere (o gruppo di 
caratteri) dopo 13 posizioni dall’inizio del precedente. Questa possibilità è utile per 
visualizzare informazioni su colonne. Si noti però che se un gruppo di caratteri è più lungo 
di 12 caratteri, il gruppo successivo verrà stampato dopo altri 13 caratteri. 


Questo limite di 13 caratteri è modificabile mediante il comando ZONE che verrà 
descritto successivamente in questo manuale. 


Di nuovo, per uscire dall'esecuzione del programma si prema due volte il tasto [ESC]. 
Per cancellare completamente la memoria del computer, si tengano premuti i tasti 


[SHIFT][CTRL] ed [ESC] esattamente in quest’ordine, ed il computer si reinizializzerà. 
INPUT 


Questo comando serve per far sapere al computer che deve essere immesso qualcosa, ad 
esempio la risposta ad una domanda. Si immettano le linee: 


10 input “quanti anni hai”; eta [RETURN] 
20 print “sembri più giovane di “;eta;” anni.” [RETURN] 
run [RETURN] 


Sullo schermo apparirà: 
quanti anni hai? 


Si immetta la propria età e si prema [RETURN]. Se la vostra età era di 18 anni, lo schermo 
mostrerà: 


sembri più giovane di 18 anni. 


Questo esempio mostra l’uso del comando input con una variabile numerica. La parola 
eta è stata messa alla fine della linea 10 e quindi il computer ha associato la parola eta 
con il numero immesso ed ha poi stampato questo numero al posto della parola eta nella 
linea 20. Come è stata usata l’espressione eta per una variabile numerica, avremmo 
potuto anche usare una sola lettera, ad esempio Db. 
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Si riavvii il computer per cancellare la memoria. (Tasti [CTRL][SHIFT] e [ESC]). Se 
si fosse voluto effettuare un input di caratteri (lettere o lettere e numeri) si sarebbe dovuto 
usare un simbolo di dollaro ($) al termine del nome della variabile. Questo tipo di 
variabile è detta ‘stringa variabile”. 


Si inserisca il seguente programma: (Nella linea 20 occorrerà inserire uno spazio dopo 
la 0 di ciao ed uno prima della i di il) 


10 input “Qual’è il tuo nome”; nome$ [RETURN] 
20 print “Ciao “;nmome$” il mio nome è Arnold” [RETURN] 
run [RETURN] 
Sullo schermo apparirà: 
Qual'è il tuo nome? 
Si immetta il proprio nome seguito da [RETURN] 
Se il nome immesso era Federico, sullo schermo apparirà: 
Ciao Federico, il mio nome è Arnold 
Come è stata usata l’espressione NOME$ per una variabile stringa, avremmo potuto anche 
usare una sola lettera, ad esempio a$. Uniamo ora i due esempi per formare un unico 


programma. 


Si reinizializzi il computer premendo [CTRL][SHIFT] e [ESC] e poi si immettano le 
seguenti linee: 


5 cls [RETURN] 

10 input “Come ti chiami”; a$ [RETURN] 

20 input “Quanti anni hai”; b [RETURN] 

30 print “Devo dire “;a$ “ che non dimostri”; b”anni” [RETURN] 
run [RETURN] 


In questo programma abbiamo usato 2 variabili: a$ per il nome e b per l’età. Sullo 
schermo apparirà: 


Come ti chiami? 
Ora si inserisca il proprio nome (ad es. Federico) e poi [RETURN]. Verrà chiesto: 
Quanti anni hai? 


Ora si inserisca la propria età (ad es. 18) e poi [RETURN]. 
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Se il nome inserito era Federico e l’età 18, sullo schermo apparirà: 


Devo dire Federico che non dimostri 18 anni 
Correzione di un programma 


Se una qualunque delle linee del programma era stata immessa non correttamente ed ha 


prodotto un messaggio Syntax error o un altro messaggio di errore, è possibile 
correggere la linea invece di riscriverla. Per provare questa operazione, si inseriscano 
queste linee di programma non corrette: 


5 clss [RETURN] 

10 input “Come t chiami”; af [RETURN] 

20 input “Quanti anni hai”; b [RETURN] 

30 print “Devo dire”;a$ “ che non dimostri”; b”anni” [RETURN] 


Nel programma vi sono 3 errori: 

Nella linea 5 abbiamo inserito clss al posto di cls. 

Nella linea 10 abbiamo inserito t invece di ti. 

Nella linea 30 abbiamo dimenticato uno spazio tra dire e le virgolette (”). 

Vi sono 3 modi per correggere un programma. Il primo consiste nella ribattitura della 
linea. Quando una linea viene ribattuta e immessa, essa sostituisce la linea con lo stesso 


numero presente nella memoria del computer. 
Il secondo metodo usa la parola edit ed infine vi è il metodo cursore copia. 


Metodo Edit 


Per correggere l’errore alla linea 5, 
si immetta: 
edit 5 [RETURN] 
La linea 5 verrà stampata dopo la linea 30 con il cursore posizionato sulla c di clss. 


Per cancellare la S in più di css, si prema il tasto di cursore a destra (->) fino a portare 
il cursore sull’ultima lettera S e poi si prema il tasto [CLR]. La Ss sparirà. 
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Ora si prema [RETURN] e la linea 5 sarà corretta anche in memoria. Si scriva: 
list [RETURN] 


... € Sì vedrà che la linea 5 è stata corretta. 


Metodo Cursore Copia 


Il cursore copia è un altro cursore (in aggiunta a quello già presente sullo schermo) che 
viene visualizzato quando si mantiene premuto il tasto [SHIFT] e si preme uno dei tasti 
cursore. Questo è separato dal cursore principale e può essere spostato in modo 
indipendente dall’altro. 


Per correggere gli errori alle linee 10 e 30, si tenga premuto il tasto [SHIFT] e poi si prema 
il tasto cursore in alto (T) fino a che il cursore copia si trova all’inizio della linea 10. Si 
noterà che il cursore principale non si è mosso e che vi sono ora 2 cursori sullo schermo. 
Ora si prema il tasto [COPY] finché il cursore copia si trova nello spazio tra t e chiami. 
Si noterà che la linea 10 verrà riscritta sull’ultima linea e che il cursore si ferma nella 
stessa posizione del cursore copia. Ora si batta la lettera i. Essa apparirà solo nell’ultima 
linea. 


Il cursore principale si è spostato mentre il cursore copia è rimasto dove era. Ora si prema 


il tasto [COPY] finché tutta la linea 10 non sarà stampata. Si prema [RETURN] e la linea 
10 verrà memorizzata. Il cursore copia sparirà ed il cursore principale si porterà sulla 


nuova linea 10. Per correggere il secondo errore, si tenga premuto il tasto [SHIFT] e si 
prema il tasto cursore in alto (T) per portare il cursore copia all’inizio della linea 30. 
Si prema ora il tasto [COPY] fino a quando il cursore copia si trova sulle virgolette vicine 
alla parola dire. Ora si prema una volta la barra spaziatrice. Sulla linea inferiore apparirà 
uno spazio. Si tenga premuto il tasto [COPY] finché il resto della linea 30 non verrà 
stampato. Poi si prema [RETURN]. 

Si può ora listare il programma per controllare che le correzioni siano state fatte 
scrivendo: 


list [RETURN] 


NOTA: Per spostare, in fase di edizione, il cursore in maniera più veloce si tenga premuto 
il tasto [CONTROL] e si prema il tasto cursore a destra o il tasto cursore a sinistra. 


Ora si reinizializzi il computer premendo i tasti [CTRL][SHIFT] e [ESC]. 
IF 


I comandi IF (SE) e THEN (ALLORA) chiedono al computer di verificare una 
condizione e prendere successivamente una decisione in base al risultato del test. 
Nell’istruzione, ad esempio: 
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if 1+1=2 then print “esatto” [RETURN] 


... il computer verificherà la condizione e prenderà successivamente una decisione. 


La parola chiave ELSE può essere usata, in un comando IF THEN, come azione 
alternativa nel caso la condizione risultasse falsa, ad esempio: 


if 1+1=0 then print “esatto” else print “sbagliato” [RETURN] 
Estenderemo ora il programma visto precedentemente con l’uso dei comandi IF e THEN. 


Si inserisca il seguente programma; si noti che vi sono 2 nuovi simboli. < significa 


“minore di” e si trova vicino alla lettera M, > significa “maggiore di” e si trova in fiando 
al tasto < (minore di). 


5 cls [RETURN] 

10 input “Come ti chiami”; a$ [RETURN] 

20 input “Quanti anni hai”; anni [RETURN] 

30 if anni < 13 then 60 [RETURN] 

40 if anni < 20 then 70 [RETURN] 

50 if anni > 19 then 80 [RETURN] 

60 print “Dunque “a$” sei quasi un ragazzo a”anni”anni”:end [RETURN] 
70 print “Dunque “a$” sei un ragazzo a”anni”anni”:end [RETURN] 

80 print “Dunque “a$” non sei piu’ un ragazzo a”anni”anni” [RETURN] 


Per controllare che il programma sia corretto, si scriva: 

list [RETURN] 

Ora si scriva: 

run [RETURN] 

Ora si risponda alle domande presentate dal computer e si veda ciò che succede. 

Si capirà ora l’effetto dei comandi IF e THEN all’interno di un programma. Abbiamo 
anche introdotto la parola END alla fine delle linee 60 e 70. La parola chiave END (fine) 
viene usata per fermare l’esecuzione del programma. Se nella linea 60 non vi fosse stato 


un END, il programma avrebbe continuato la propria esecuzione con le linee 70 e 80. 


Nello stesso modo se non vi fosse stato un END alla linea 70 il programma avrebbe 
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continuato la propria esecuzione con la linea 80. I due-punti (:) prima della parola END 
separa quest’ultima dall’istruzione precedente. I due-punti servono per porre due o più 
istruzioni in una linea di comando. La linea 5 all’inizio del programma serve per 
cancellare lo schermo. Da questo momento introdurremo sempre tale comando nei 
programmi per pulire la memoria. 


Si riavvii il computer premendo i tasti [CTRL][SHIFT] e [ESC]. 
FOR e NEXT 


I comandi FOR e NEXT sono usati per eseguire delle operazioni un numero specifico 
di volte. Le istruzioni da ripetere devono essere incluse nel ciclo FOR NEXT. 


Si scriva: 


5 cls [RETURN] 

10 fora=1 to 10 [RETURN] 

20 print “numero operazione”;a [RETURN] 
30 next a [RETURN] 

run [RETURN] 


Si potrà notare che l’istruzione della linea 20 viene eseguita 10 volte, così come 
specificato dal comando FOR della linea 10. Si noti inoltre che il valore della variabile 
a viene incrementato ad ogni passo del ciclo di 1. 

In un ciclo FOR NEXT è anche possibile inserire la parola chiave STEP la quale serve 
ad incrementare di un dato valore la variabile. Si modifichi, ad esempio, la linea 10 come 
segue: 


10 for a=10 to 50 step 5 [RETURN] 
run [RETURN] 


E’ possibile anche usare un valore di incremento negativo: 


10 for a=100 to 0 step -10 [RETURN] 
run [RETURN] 


REM 


REM è la abbreviazione di REMark (ovvero nota). Questa istruzione indica al computer 
di ignorare tutto ciò che segue sulla linea. E’ possibile usare REM per ricordare, ad 
esempio, il titolo di un programma, l’uso di una variabile: 


10 REM Uccisione degli invasori [RETURN] 
20 L=5 :REM numero di vite [RETURN] 
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L’apice ‘ (che può essere scritto tenendo premuto il tasto [SHIFT] e premendo il tasto 7) 
può essere usato al posto del comando REM. Ad esempio: 


10 ‘Uccisione degli invasori [RETURN] 
20 L=5 ‘numero di vite [RETURN] 


GOSUB 


Se all’interno del programma vi è un gruppo di istruzioni che deve essere ripetuto diverse 
volte, non occorre scriverlo ripetutamente tutte le volte che occorre; può essere invece 
inserito in una ‘sotto-routine’ che viene richiamata tutte le volte richieste mediante il 
comando GOSUB seguito dal numero di linea. La fine della routine GOSUB è 
contrassegnata da una istruzione RETURN. A quel punto il computer tornerà ad eseguire 
l’istruzione seguente il GOSUB. 


Nel seguente programma ad esempio: 


10 a=2 

20 PRINT “questa è la tabellina del numero”;a 
30 FOR b=1 TO 12 

40 c=a*b 

50 PRINT a;”x";}b;"=";c 

60 NEXT 

70 PRINT 

80 ‘ 

90 a=5 

100 PRINT “questa è la tabellina del numero”;a 
110 FORb=1 TO 12 

120 c=a*b 

130 PRINT a;x”;b;"=";c 

140 NEXT 

150 PRINT 

160 ‘ 

170 a=8 

180 PRINT “questa è la tabellina del numero”;a 
190 FOR b=1 TO 12 

200 c=a*b 

210 PRINT a;”x”;b;”=";c 

220 NEXT 

230 PRINT 

240‘ 

250 a=9 

260 PRINT “questa è la tabellina del numero”;a 
270 FOR b=1 TO 12 
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280 c=a*b 

290 PRINT a;”x”}bj"=";c 
300 NEXT 

310 PRINT 


... è possibile vedere i numeri di linea che sono stati ripetuti nei vari punti del programma, 
ad esempio, il gruppo dalla linea 260 alla linea 310. Possiamo prendere questo gruppo 
di linee e formare una sotto-routine ed aggiungere una istruzione RETURN alla fine. 
Successivamente richiameremo tale sotto-routine con una istruzione GOSUB 260 ogni 
volta che sarà necessario. Il programma risulterà come segue: 


10 a=2 

15 GOSUB 260 

80 ‘ 

90 a=5 

95 gosub 260 

160 ‘ 

170 a=8 

175 gosub 260 

240‘ 

250 a=9 

255 gosub 260 

256 END 

257 ‘ 

260 PRINT “questa è la tabellina del numero”;a 
270 FOR b=1 TO 12 
280 c=a*b 

290 PRINT a;”x”;b;"=";c 
300 NEXT 

310 PRINT 

315 RETURN 


Le sotto-routine sono una parte principale della programmazione. Esse comportano 
programmi strutturati e sviluppano ottimi ambienti di programmazione. 


Occorre sempre tenere in mente che quando si scrive una sotto-routine non è necessario 


‘saltare’ sempre nello stesso punto. Una sotto-routine scritta dalla linea 500 fino alla linea 
800 può essere richiamata come: GOSUB 500, o GOSUB 640 o GOSUB 790. 


Si noti che nel precedente programma l’istruzione END è stata posta nella linea 256. Se 
così non fosse stato il programma sarebbe andato avanti ad eseguire, dopo la linea 255 
la linea 260 la quale NON era richiesta da nessuna istruzione GOSUB. 
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ARITMETICA SEMPLICE 


Il CPC6128 può anche essere facilmente usato come calcolatrice. 


Per comprendere ciò si vedano gli esempi seguenti. In questo paragrafo useremo il 
simbolo ? al posto della parola chiave PRINT. Le risposte verranno stampate subito dopo 
aver premuto il tasto [RETURN]. 


ADDIZIONE 
(per scrivere il simbolo più si usano i tasti [SHIFT] e ;) 
Si scriva: 


23+3 [RETURN] 
6 


(NON deve essere inserito il simbolo di uguale (=)) 
Si scriva: 


?8+4 [RETURN] 
12 


SOTTRAZIONE 
(per il meno si usa il tasto con il simbolo di =) 
Si scriva: 


?4-3 [RETURN] 
1 


Si scriva: 
?°8-4 [RETURN] 
4 


MOLTIPLICAZIONE 
(per il tale simbolo si usa [SHIFT] e : in quanto * sta per x) 
Si scriva: 


?3*3 [RETURN] 
9 


Si scriva: 


28*4 [RETURN] 
32 
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DIVISIONE 


(per il simbolo di divisione si usa il tasto che riporta anche ? in quanto / sta per :) 


Si scriva: 


?3/3 [RETURN] 
1 


Si scriva: 


?8/4 [RETURN] 
2 


DIVISIONE INTERA 
(usa il simbolo di divisione \ senza considerare il resto) 
Si scriva: 


?10\6 [RETURN] 
1 


Si scriva: 


?20\3 [RETURN] 
6 


MODULO 
(per ottenere il resto di una divisione intera si usi il comando MOD) 
Si scriva: 


?10 MOD4 [RETURN] 
2 


Si scriva: 


?9 MOD 3 [RETURN] 
0 


RADICE QUADRATA 


Per trovare la radice quadrata di un numero si usa SQr ( ). Il numero di cui si vuole la radice 
quadrata dovrà essere posto tra le due parentesi. 


Si scriva: 


?sqr(16) [RETURN] 
4 
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Si scriva: 


?sqr(100) [RETURN] 
10 


ESPONENZIALE 
(si usi il tasto che riporta il simbolo di £) 


L’esponenziale è l’elevamento a potenza di un numero. Ad esempio 3 al quadrato, 3 al 
cubo, ecc. 


Si scriva: 


2373 [RETURN] (significa 33) 
Si scriva: 

?8T4 [RETURN] (significa 84 
(ARA ] (sig ) 


RADICE CUBICA 


Si può facilmente calcolare la radice cubica di un numero usando un metodo simile al 
precedente. Per trovare la radice cubica di 27, si scriva: 


3279(1/8) [RETURN] 


Per trovare la radice cubica di 125, si scriva: 


21257(1/8) [RETURN] 
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CALCOLI MISTI 
(+,-,#,/MODN 


I calcoli misti sono compresi dal computer ma calcolati secondo alcune priorità. La 
massima priorità è data alla moltiplicazione ed alla divisione, poi all’addizione ed alla 
sottrazione. Queste priorità si applicano a calcoli contenenti solo queste quattro opera- 
zioni. 


Se il calcolo era: 
3+7-2*7/4 
Si potrà pensare che verrà calcolato in questo modo: 


3+7-2 *7 /4 
=8*7/4 

= 56/4 

= 14 


Mentre verrà calcolato nel seguente modo: 


3+7-2*7/4 
=3+7-14/4 
=3+7-3.5 
=10-3.5 
=6.5 


Si provi ad inserire la seguente istruzione: 


?3+7-2*7/4 [RETURN] 
6.5 


E’ possibile modificare il modo in cui il computer effettua questo calcolo utilizzando 
delle parentesi. Il computer effettuerà i calcoli contenuti nelle parentesi prima di passare 
a quelli fuori dalle parentesi. Si dimostri ciò immettendo il calcolo sopra presentato ma 
utilizzando le parentesi. 


Si scriva: 


?(3+7-2)*7/4 [RETURN] 
14 
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La priorità di TUTTE le operazioni aritmetiche è la seguente: 


i) Esponenziale 
MOD Modulo 


- Meno unitario (indica un numero come negativo) 
* e/ Moltiplicazione e divisione 

\ Divisione intera 

+e - Addizione e sottrazione 


ALTRI ESPONENTI 


Se nei propri calcoli si devono usare numeri molto grandi o molto piccoli, è talvolta utile 
usare la notazione scientifica. La lettera E indica l’elevamento a potenza della base 10 ad 
un numero. Si può usare la lettera e in maiuscolo o in minuscolo. 


Ad esempio 300 è la stessa cosa di 3x102. In notazione scientifica perciò si scriverà 3E2. 
In modo simile 0.03 è la stessa cosa di 3x10?. Si provino i seguenti esempi 


Si può scrivere: 


?30*10 [RETURN] 
300 


oppure: 


?3E1*1E1 [RETURN] 
300 


?300*1000 [RETURN] ... oppure ... ?23E3*1E3 [RETURN] 
3000000 


23000*0.001 [RETURN] ... oppure ... ?3E3*1W-3 [RETURN] 
3 
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Parte 7: Come salvare ... 


Ora che si è provato a scrivere qualche programma si vorrà probabilmente sapere come 
salvarlo su disco e ricaricarlo successivamente. 


Anche se si conosce il meccanismo di salvataggio e caricamento delle cassette è bene 
fornire alcune informazioni importanti che devono essere osservate quando si tratta con 
dischi e file di programma. 


Vi sono due differenze principali la prima delle quali è che non è possibile estrarre dalla 
custodia un dischetto e registrà immediatamente, come per le cassette. Un disco nuovo 
deve essere prima ‘formattato’; questo processo verrà spiegato di seguito. 


L’altro punto consiste nell’importanza di fornire un ‘nome’ ai file del disco. I nomi delle 
cassette sono generalmente conformi ad alcuni standard che variano molto in larghezza 
e che possono essere omessi. Ciò non è possibile con i dischi. I nomi dei file di disco 
devono essere strettamente conformi allo standard CP/M che verrà successivamente 
spiegato in questo paragrafo. 


Formattazione dei dischi 


Prima di scrivere dei dati su un disco vergine quest’ultimo deve essere formattato. La 
formattazione può essere paragonata alla costruzione di una serie di ripiani che vengono 
distribuiti nel disco per memorizzare informazioni; in altre parole, si pone un ambiente 
di lavoro organizzato in cui i dati possono essere memorizzati o prelevati. 


La formattazione divide il disco in 360 aree separate: Traccia 39 


i Custodia esterna 


Settore 


Traccia 0 
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Vi sono 40 tracce partendo dall’esterno (Traccia 0) fino all’interno (Traccia 39) del disco 
ed inoltre la circonferenza di quest’ultimo è suddivisa in 9 settori. 


Ogni traccia di un settore può memorizzare 512 byte di dati; quindi il totale disponibile 
su ogni lato del disco è di 180Kbyte. 


Primi passi nell’uso dei dischi di sistema di CP/M 


Per predisporre un dischetto vergine affinchè sia possibile leggervi e scrivervi programmi 
occorre formattarlo. Tale operazione può essere svolta usando il lato 1 (Side 1) del disco 
di sistema CP/M (fornito insieme al computer). 


Si accenda il sistema e si inserisca il lato 1 (Side 1) del disco di sistema nel drive. 


Se si possiede il secondo drive si inserisca sempre tale disco nel drive all’interno del 
computer (Drive A). 


Si scriva: 
|cpm [RETURN] 


(E’ possibile scrivere il simbolo | mantenendo premuto il tasto [SHIFT] e premendo il 


tasto @). 


Dopo pochi secondi in alto sullo schermo si potrà leggere il seguente messaggio: 
CP/M Plus Amstrad Consumer Electronics plc 

Questo è un messaggio ‘Sign on’ che indica che il computer è sotto il controllo del sistema 
operativo CP/M Plus. Accanto al cursore si potrà vedere sullo schermo anche il simbolo 
A>. Questo è il prompt (analogo a Ready nelle operazioni BASIC) che indica che il 


computer è in attesa di istruzioni. 


Una volta entrati in ambiente CP/M non è possibile inserire i comandi di BASIC poichè 
questi non verranno riconosciuti dal sistema operativo. 


Se per esempio si inserisce il comando BASIC: 
cls [RETURN] 

Il computer risponderà: 

CLS? 


...indicando che non ha compreso il comando. 
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Per vedere brevemente quali sono i comandi di CP/M si scriva: 
dir [RETURN] 


Sullo schermo verrà visualizzata la DIRettrice di CP/M e le utilità COMandi, una delle 
quali è DISCKIT3. Si scriva: 


disckit3 [RETURN] 


Dopo pochi secondi si vedrà, in alto nello schermo, il messaggio iniziale di tale 
programma e successivamente il seguente: 


One drive found 
Questo messaggio indica che il programma di utilità DISC KIT è in esecuzione e che il 


computer ha scoperto che l’utente sta lavorando con un solo drive (quello all’interno del 
computer). 


Se si è invece connesso anche il secondo drive il messaggio sarà: 


Two drives found 


In alto nello schermo si vedrà la seguente schermata 


Copy 
Format 
Verify 


Exit from program 


Questo è il menù principale di DISC KIT. I numeri dei quadrati fanno riferimento ai tasti 


funzione situati sulla destra della tastiera (contrassegnati con f0, f1, f4 e f7); scegliendo 
uno di tali tasti si seleziona la scelta corrispondente del menù. 


Si noti che premendo a questo punto il tasto f0 si esce dal programma DISC KIT e si torna 
in ambiente CP/M (verrà visualizzato il prompt A>). 


Vogliamo a questo punto formattare un disco, quindi si prema il tasto corrispondente alla 
funzione 4 (f4). 


ATTENZIONE 
LA FORMATTAZIONE DI UN DISCO REGISTRATO PRECEDENTEMENTE 


COMPORTA LA CANCELLAZIONE DI TUTTO IL SUO CONTENUTO 
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Si potrà vedere a questo punto sullo schermo un nuovo menù che permette di scegliere 
diversi formati: 


System format 
Data format 
Vendor format 


Exît menu 


Come prima è possibile ora premere un tasto funzione (f3, £6 o f9) per selezionare il tipo 
di formattazione desiderato. Ognuno di questi differenti tipi di formattazione verranno 
descritti successivamente nel manuale, per il momento si selezioni Data format premendo 
il tasto funzione 6. 


Si noti che premendo il tasto . (sotto f3, f6 e f9) si esce da tale menù per tornare nel menù 
principale di DISC KIT. 


Avendo premuto il tasto funzione numero 6 (ed assumendo che non si sia connesso al 
computer alcun drive addizionale) si vedrà il messaggio: 


Format as Data 


Any other key to exit menu 


A questo punto occorre togliere dal drive il disco di sistema CP/M ed inserire il disco che 
si desidera formattare. Il lato del disco che deve essere formattato deve avere l’etichetta 
rivolta verso l’alto. 


Si prema ora il tasto Y (Y per Sì significa ‘vai avanti a formattare il disco”). 
Il disco verrà formattato dalla traccia 0 alla 39; il numero di traccia attuale verrà 
visualizzato nell’angolo in alto a sinistra dello schermo. 


Non sarà possibile formattare un disco se questo possiede il foro di protezione dalla 
scrittura aperto nel qual caso verrà visualizzato il seguente messaggio: 


Disc write-protected 
Insert disc to format 
R-etry or C-ancel 


... e occorrerà scrivere C per Cancellare, si dovrà togliere il disco ed inserire il disco esatto 
da formattare il quale deve avere il foro di protezione dalla scrittura chiuso. 


Corso Introduttivo Capitolo 1 Pagina 41 


Ci si assicuri di non chiudere il foro di protezione dalla scrittura in un disco di cui si 
vogliono tenere i programmi e. di non chiudere MAI il foro di protezione dalla scrittura 
del disco di sistema CP/M. 


AI termine della formattazione verrà richiesto di togliere il disco formattato dal drive e 
di premere un qualsiasi tasto per continuare. 


Dopo aver fatto ciò sarà possibile formattare un altro disco inserendolo nel drive e 
premendo ancora il tasto Y. Si può ripetere consecutivamente questa operazione fino a 
quando non si sono formattati tutti i dischi necessari. 


AI termine della formattazione è possibile tornare nel menù principale di DISC KIT 
premendo un qualsiasi tasto (diverso da Y). 


L’opzione Copy e Verify verranno spiegate successivamente; per il momento si riavvii 


il computer usando i tasti [CONTROL][SHIFT][ESC]. 
Si mantengano sempre le copie originali del disco di sistema CP/M in un luogo sicuro: 
esse sono realmente la chiave del sistema. Successivamente in questo manuale verrà 


spiegato come effettuare ‘copie di lavoro’ di tali dischi per poter tenere gli originali 
sempre al sicuro. 


Formattazione sul secondo drive. 


Si seguano le istruzioni fornite precedentemente, si selezioni l’opzione Format nel menù 
principale di DISC KIT premendo il tasto funzione f4 e successivamente Data format 
premendo f6. 


A questo punto verrà visualizzato sullo schermo un terzo menù che fornisce la possibilità 
di scegliere su quale drive si vuole formattare: 


Read from A: 
Read from B: 


Exit menu 


Scegliendo l’opzione Format B: (tasto £5) si potrà lasciare il disco di sistema (Side 1) nel 
Drive A e porre il disco da formattare nel Drive B. 


Dopo aver selezionato Format B: si può premere Y per formattare o un qualsiasi altro 
tasto per tornare nel menù principale di DISC KIT. 
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Se si è selezionato invece Format A: (tasto f8) OCCORRE ricordarsi di togliere il disco 
di sistema dal Drive A ed inserivi il disco da formattare. 


Non dimenticare - NON RISCHIARE MAI DI SOVRASCRIVERE IL DISCO DI 
SISTEMA CP/M. 


Ora che abbiamo formattato un disco possiamo iniziare ad usare i programmi di BASIC. 


Come salvare un programma residente in memoria su 
disco 


Avendo scritto un programma in memoria salviamolo su disco scrivendo: 


save “nomefile” [RETURN] 

Si noti che è obbligatorio dare un nome al programma. 

Il nomefile su disco è composto da due parti (campi). La prima parte è obbligatoria e può 
contenere al massimo otto caratteri: è possibile usare lettere e numeri ma NON spazi o 


simboli di punteggiatura. Il primo campo contiene di solito il nome del programma. 


Il secondo campo è facoltativo. E’ possibile usare al massimo tre caratteri ma non spa- 
zi o simboli di punteggiatura. I due campi sono separati da un punto. 


Se il secondo campo non viene specificato i sistema attribuisce automaticamente il tipo; 
inserisce .BAS per i file di BASIC e .BIN per i file binari (linguaggio macchina). 


Si provi a scrivere, come esempio, un breve programma, si inserisca un disco formattato 
nel drive e si scriva: 


save “esempio” [RETURN] 
Dopo pochi secondi sullo schermo apparirà la scritta Ready ed il programma sarà stato 
salvato su disco (in caso contrario si controlli sullo schermo il messaggio apparso, si 


potrebbe aver inserito il disco nel drive sbagliato, dimenticato il foro di protezione dalla 
scrittura chiuso o scritto male il comando). 


Catalogo 
Dopo aver salvato il programma precedente si scriva: 


cat [RETURN] 
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Sullo schermo apparirà il seguente messaggio: 
Drive A: user 0 

EXAMPLE.BAS 1K 

177K free 


Viene visualizzato il nome del file, la lunghezza di questo e l'ammontare di spazio libero 
sul disco. 


Caricamento da disco 


I programmi possono essere caricati ed eseguiti da disco usando i comandi: 


load “nomefile” [RETURN] 
run [RETURN] 


... O eseguiti direttamente usando il comando: 
run “nomefile” [RETURN] 
Si noti che i programmi protetti possono essere solo eseguiti direttamente. 


|A e |B 


Se si è connesso un drive addizionale è possibile specificare quale drive (A o B) deve 
effettuare l’operazione richiesta mediante il comando: 


|a [RETURN] 


sara 
]b [RETURN] 


... prima di inoltrare un comando SAVE, CAT o LOAD. 


[--EEREI*-*;é; EEE... n 
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Come copiare programmi da un disco in un altro 


Usando i comandi visti in questo paragrafo possiamo vedere come eseguire una 
operazione di copia caricando semplicemente dal disco originale (sorgente) il pro- 
gramma in memoria, togliendo il disco originale e salvando il programma sul disco 
destinazione. 


Per copiare un programma da un disco all’altro usando un sistema con due drive è 
possibile inserire il disco sorgente nel Drive B e quello di destinazione in A, si scriva ad 
esempio: 

|b [RETURN] 

load “nomefile” [RETURN] 

|a [RETURN] 

save “nomefile” [RETURN] 


Sul CPC6128 vi sono quattro modi per salvare un file. Oltre a quello già noto di BASIC: 
save “nomefile” [RETURN] 

... vi sono altre tre metodi alternativi, ovvero: 

File ASCII 

save “nomefile”,a [RETURN] 

Aggiungendo il suffisso a si indica al computer di salvare il programma di dati in forma 
di file di testo ASCII. Questo metodo si applica ai file creati da altri editor e ad altre 
applicazioni di programma; il loro uso verrà discusso successivamente. 

File protetti 

save “nomefile”,p [RETURN] 

Aggiungendo il suffisso p si indica al computer di proteggere i dati in modo che il 


programma non possa essere LISTato dopo essere stato caricato (LOAD) o eseguito 
(RUN) e fermare l’esecuzione con il tasto [ESC]. 
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I programmi salvati in tal modo possono essere solo eseguiti direttamente usando il 
comando: 


run “nomefile” [RETURN] 
... Oppure ... 
chain “nomefile” [RETURN] 


Se si pensa di aver bisogno successivamente di editare o modificare il programma, sarà 
necessario effettuare una copia di questo in forma non protetta, ovvero senza suffisso ,p. 


File binari 


save “nomefile”,b, <indirizzo iniziale> , <lunghezza in byte> [,<voce 
opzionale>][RETURN] 


Questa opzione permette di salvare in forma binaria un blocco di dati presenti in memoria 
RAM su disco. E’ necessario indicare esattamente al computer dove inizia la parte di 


memoria che si vuole salvare, quanto è lunga e, se richiesto, l’indirizzo della memoria in 
cui far partire l’esecuzione del file. 


Screen Dump 


Questa caratteristica binaria permette di salvare i dati presenti sullo schermo direttamente 
su disco. Il contenuto dello schermo verrà visualizzato così come appare usando il 
comando: 


save “scrndump”,b,49152,16384 [RETURN] 
... dove 49152 è l’indirizzo iniziale della memoria dello schermo e 16384 quallo finale. 


Per richiamare lo schermo si scriva: 


load “scrndump” [RETURN] 


Ulteriori informazioni sull’uso del sistema nel trattamento di file tra dischi (e cassette) 
verranno fornite successivamente. 


Si controlli inoltre di aver seguito attentamente le istruzioni fornite all’inizio di questo 
manuale, nel paragrafo intitolato ‘IMPORTANTE’: 


NOTE DI INSTALLAZIONE 5,6,7 
NOTE OPERATIVE 1,2,3,4,5,6,7,9 
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Parte 8 Modalità, Colori e Grafica ... 


Il CPC6128 Colour Personal Computer Amstrad possiede tre modalità di visualizza- 
zione sullo schermo: Mode 0, Mode 1 e Mode 2. 


Quando il computer viene acceso esso si trova automaticamente in Mode 1. 


Per comprendere la differenza tra queste modalità si accenda il computer e si prema il 
tasto 1. Lo si mantenga premuto fino a quando non si sono riempite due linee di 1. Se si 
conta ora il numero di 1 presenti su una linea si vedrà che questo è pari a 40. Ciò significa 
che in modalità 1 (mode 1) si hanno 40 colonne. Si prema [RETURN]: si otterrà come 
risposta un messaggio Syntax error (Errore di sintassi) ma non ci si preoccupi, è solo un 
modo veloce per porre il computer in attesa di istruzioni. Infatti esso visualizzerà il 


messaggio Ready. 

Si scriva ora: 

mode 0 [RETURN] 

Si potrà notare che i caratteri scritti sullo schermo sono molto larghi. Si prema ancora il 
tasto 1 e lo si mantenga premuto fino a quando non si sono riempite due linee di 1. Se si 


conta ora il numero di 1 presenti su una linea si vedrà che questo è pari a 20. Ciò significa 
che in modalità 0 (mode 0) si hanno 20 colonne. Si prema ancora [RETURN]. 


Si scriva ora: 
mode 2 [RETURN] 


Si vedrà che questa è la modalità minore, infatti se si scrive una riga piena di 1 se ne 
potranno contare 80. Ciò significa che in modalità 2 (mode 2) vi sono 80 colonne. 


Quindi: 

Mode 0 = 20 colonne 
Mode 1 = 40 colonne 
Mode 2 = 80 colonne 


Si prema infine ancora una volta [RETURN]. 
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COLORI 


Vi è una scelta di 27 colori. Su un monitor a fosfori verdi (GT 65) questi vengono 
visualizzati in scala di verde. Se si è acquistato un monitor GT 65 è possibile acquistare 
un Modulatore/Amplificatore MP2 AMSTRAD al fine di usare le caratteristiche di 
colore del televisore. 


In Mode 0, dei 27 colori disponibili è possibile visualizzarne contemporaneamente sullo 
schermo 16. 

In Mode 1, dei 27 colori disponibili è possibile visualizzarne contemporaneamente sullo 
schermo 4. 

In Mode 2, dei 27 colori disponibili è possibile visualizzarne contemporaneamente sullo 
schermo 2. 


E’ possibile modificare il colore del bordo della pagina (BORDER), dell’area in cui 
appaiono i caratteri (PAPER) o del carattere stesso (PEN) in modo indipendente l’uno 
dall’altro. 


Nella Tabella 1 sono elencati i 27 colori disponibili ognuno dei quali ha associato il 
numero di riferimento dell’inchiostro (INK). 
Per comodità questa tabella è riportata inoltre nel pannello in alto a destra del computer. 


TABELLA DEI COLORI 


N. inch.(INK)  Colore/Inch. (INK) N. inch.(INK) Colore/Inch. (INK) 


Nero Blu pastello 

Blu Arancio 

Blu brillante Rosa 

Rosso Magenta pastello 
Magenta Verde brillante 
Malva Verde mare 
Rosso brillante Azzurro brillante 
Violetto Verde limone 
Magenta brillante Verde pastello 
Verde Azzurro pastello 
Azzurro Giallo brillante 
Blu cielo Giallo pastello 
Giallo Bianco brillante 
Bianco 


0 
1 
2 
3 
4 
5 
6 
7 
8 
9 


Tabella 1: numeri inchiostro e colori 


Come appena spiegato quando si accende il computer questo è in Mode 1. Per riportarlo 
in tale modalità quando si è in un’altra si scriva: 


mode 1 [RETURN] 
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Lo schermo di visualizzazione 


PEN 
Anstrad 128K Miorocomputer (v3) 
c1905 anstrn fonsunen i asptentt*. tie 
BORDER 
PAPER 


AMSIRAD 


BORDER è il bordo che racchiude l’area di visualizzazione dei caratteri (PAPER) (si 
noti che all’atto dell’accensione del computer sono entrambi blu). I caratteri visualizzati 
sullo schermo possono apparire solo all’interno di tale bordo. PAPER è l’area all’interno 
del bordo in cui vengono visualizzati i caratteri mentre PEN scrive i caratteri stessi. 


Spiegheremo ora come vengono selezionati i colori che appaiono sullo schermo e come 
modificarli. 


Quando si accende o si riavvia il computer il colore di BORDER è sempre equivalente 
al numero I. Se si guarda nella Tabella 1 dei colori si potrà notare che tale numero 
equivale al blu. Il colore del bordo può essere modificato usando il comando BORDER 
a cui fa seguito un numero. Per cambiare il colore del bordo (BORDER)si scriva:border 


13 [RETURN] 


Fin qui tutto bene. Ora le cose si complicano leggermente ... 


Quando si accende o si riavvia il computer vengono automaticamente selezionati i numeri 
0 per PAPER e I per PEN. Ciò NON significa che si devono guardare i valori di 0 e 1 
nella Tabella 1. 


La cosa importante da ricordare è che sia 0 che 1 sono i numeri relativia PAPER e a PEN: 
NON sono i numeri relativi al colore dell’inchiostro. Per capire tale differenza si provino 
ad immaginare 4 penne appoggiate sul proprio tavolo numerate 0,1,2 e 3 e si supponga 
di poterle riempire con uno qualsiasi dei 27 colori presenti nelle boccette dei colori 
numerate da 0 a 26. E’possibile inoltre che la penna numero 1 non sia necessariamente 
sempre dello stesso colore: questa può essere riempitaconun inchiostro diverso, perciò 
è possibile riempire tutte e quattro le penne con lo stesso inchiostro. 


Lo stesso discorso vale se applicato al computer. Usando i comandi PEN e INK è 
possibile selezionare il numero di penna e il colore per quella penna. 
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Si ricordi che stiamo operando in Mode 1 (40 colonne); guardando la Tabella 2 che segue 
si potrà vedere nella prima e terza colonna che il numero di PEN 1 corrisponde al colore 
numero 24. Se si guarda ora il numero di INK (inchiostro) 24 nella Tabella 1 si potrà 
vedere che tale colore è giallo brillante, ovvero il colore dei caratteri che appaiono sullo 
schermo quando si accende il computer. 


PARAMETRI PER DIFETTO 


Nr. schermo/carattere Colori 
Mode 0 
1 

24 

20 

6 


0 
1 
2 
3 
4 
) 
6 
7 
8 
9 


Lampeggiante 1,24 20 
Lampeggiante 16,11 6 


Tabella 2 : riferimenti PAPER/PEN/MODE/INK 
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Le relazioni PAPER/PEN/MODE//INK fornite nella Tabella 2 non sono comunque fisse. 
Vi sono dei parametri per difetto che vengono assunti ogni volta si accenda o si riavvii 
il computer. E’ possibile modificarli usando il comando INK. Tale comando è composto 
da due parti (o ‘parametri ’). Il primo numero è il numero di PAPER o PEN a cui si vuole 
fornire un inchiostro, la seconda parte è l’inchiostro stesso. Le due parti del comando 
devono essere separate da una virgola , 


Ora che sappiamo che il numero di penna che stiamo usando è 1 modifichiamo il suo 
colore in arancione. 


Si scriva: 
ink 1,15 [RETURN] 
... © si potrà vedere che i caratteri sullo schermo hanno cambiato colore. 


Anche il colore dello sfondo può essere modificato usando un comando INK. Sappiamo 
che il numero di PAPER è 0: modifichiamone il colore in verde (colore numero 9) 
scrivendo il comando: 


ink 0,9 [RETURN] 
Ora usiamo un’altra penna. Si scriva: 


pen 3 [RETURN] 


Si noti che solo il colore dei nuovi caratteri (dopo il comando di modifica) è stato 
cambiato. 

Stiamo ora usando il numero di penna (PEN) 3. Guardando la Tabella 2 si potrà notare 
che il numero 3 corrisponde al numero di colore 6 (rosso brillante). Modifichiamolo in 
rosa scrivendo: 


ink 3,16 [RETURN] 


Si ricordi che 3 è il colore della penna selezionata precedentemente con il comando: pen 
3 e 16 è il colore dell’inchiostro, ovvero rosa. 
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Modifichiamo ora l’area in cui appaiono i caratteri. Quando si seleziona un nuovo 
PAPER il colore di sfondo precedente NON viene modificato poichè quel colore viene 
stampato da un PAPER differente. Per veder ciò si scriva: 


paper 2 [RETURN] 


Ancora una volta si usino le Tabelle 1 e 2 per vedere perchè il numero di fondo del numero 
PAPER 2 è azzurro. Lo si modifichi in nero scrivendo: 


ink 2,0 [RETURN] 

Sullo schermo ora si hanno caratteri scritti con numero di PEN 1 e 3 su sfondo con 
numero PAPER 0 e 2. Gli INK (inchiostri) che non si stanno usando possono essere 
modificati in PEN o PAPER. Si scriva, ad esempio: 

ink 1,2 [RETURN] 

... che modifica il colore di tutti i caratteri scritti precedentemente con PEN numero 1. 
Si scriva: 

cls [RETURN] 


... per pulire lo schermo. 


L’utente dovrebbe essere ora in grado di riportare il computer nella modalità originale 
(bordo e sfondo blu con caratteri giallo brillante) usando i comandi BORDER, PAPER, 
PEN e INK. Se così non fosse si riavvi il computer mantenendo premuti i tasti 


[CONTROLJ[SHIFT] e [ESC]. 
COLORI LAMPEGGIANTI 


E° possibile rendere il colore dei caratteri lampeggiante: che passa cioè da un colore ad 
un altro. Ciò è ottenibile mediante un ulteriore numero di colore inserito nel comando INK 


di PEN. 


Per vedere lampeggiare i caratteri dello schermo dal colore bianco brillante al rosso 
brillante si riavvi il computer usando [CONTROLI][SHIFT][ESC] e si scriva: 


ink 1,26,6 [RETURN] 
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In questo caso, 1 è il colore del carattere (PEN) mentre 26 è il colore bianco brillante e 
6 il colore alternativo, rosso brillante. 


E’ inoltre possibile rendere il colore dello schermo (PAPER) in fianco ai caratteri 
lampeggianti, lampeggiante anch’esso: da un colore in un altro. Ciò può essere ottenuto 
aggiungendo al comando INK dello schermo un ulteriore numero. 


Per vedere lampeggiare lo schermo dal colore verde al giallo brillante si può scrivere: 
ink 0,9,24 [RETURN] 


In questo caso 0 è il numero di PAPER (schermo) mentre 9 è il colore verde e 24 il colore 
alternativo, giallo brillante. 
Si riavvi a questo punto il computer mediante i tasti [CONTROL][SHIFT][ESC]. 


Si noti che in Mode 0 due dei caratteri (numeri 14 e 15) insieme a due dello schermo 
(numeri 14 e 15) sono i parametri per difetto dei colori lampeggianti. In altre parole non 
è necessario aggiungere un ulteriore numero al comando INK. 


Si scriva: 


mode 0 [RETURN] 
pen 15 [RETURN] 


si vedrà sullo schermo la parola Ready lampeggiare nei colori blu cielo e rosa. 


Si scriva ora: 


paper 14 [RETURN] 
cls [RETURN] 


Oltre alla parola Ready lampeggiante in blu cielo e rosa si potrà vedere che anche lo 
schermo lampeggia: modificando alternativamente il colore da giallo a blu. 


I numeri 14 e 15 di PEN e di PAPER possono essere riprogrammati usando il comando 
INK in modo che si possano usare altri colori. 


E’ possibile, infine, rendere anche il bordo lampeggiante: per far ciò occorre aggiungere 
nel comando BORDER un ulteriore numero di colore. Si scriva: 


border 6,9 [RETURN] 


Si vedrà il bordo lampeggiare nei colori rosso brillante e verde. Si noti che il bordo può 
essere fissato in uno qualunque dei 27 colori senza dover tener conto della modalità in cui 
si sta operando: 0, 1 o 2. 


Si riavvi a questo punto il computer mantenendo premuti i tasti 


[CONTROLI][SHIFT][ESC]. 
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Per una ulteriore dimostrazione dei colori disponibili si scriva il seguente programma e 
lo si esegua (mediante comande run). 


10 MODE 0 [RETURN] 

20 num=600: REM fissa la velocità del programma [RETURN] 
30 FOR b=0 TO 26 [RETURN] 

40 LOCATE 3,12 [RETURN] 

50 BORDER b [RETURN] 

60 PRINT “colore del bordo”;b [RETURN] 
70FOR t=1 TO num [RETURN] 

80 NEXT t,b [RETURN] 

90 CLG [RETURN] 

100 FOR p=0 TO 15 [RETURN] 
110 PAPER p [RETURN] 

120 PRINT “carta”;p [RETURN] 
130 FOR n=0 TO 15 [RETURN] 
140 PEN n [RETURN] 

150 PRINT “penna”;n [RETURN] 
160 NEXT n [RETURN] 

170 FOR t=1 TO num*2 [RETURN] 
180 NEXT t,p [RETURN] 

190 MODE 1 [RETURN] 

200 BORDER 1 [RETURN] 

210 PAPER O [RETURN] 

220 PEN 1 [RETURN] 

230 INK 0,1 [RETURN] 

240 INK 1,24 [RETURN] 

run [RETURN] 


IMPORTANTE 


Nel programma precedente e in quelli che seguiranno nel manuale le parole chiave di 
BASIC sono state scritte in maiuscolo. Questo è anche il modo in cui appariranno sullo 
schermo quando verrà inserito un comando LIST. In generale è preferibile che l’utente 
scriva tali parole in minuscolo poichè nel caso di errori di battitura il listato del programma 
servirà adevidenziarli; questo perchè la parole chiave di BASIC scritte in modo errato NON 
verranno convertite in maiuscolo. 


Nel resto di questo capitolo scriveremo tali programmi sia in maiuscolo che in minuscolo 
per abituare l’utente a questo aspetto. 


Il nome di una variabile come x o a$ NON verrà convertita in maiuscolo quando il 
programma viene listato sebbene il computer riconoscerà tale nome senza tener conto di 
come sia stata scritta: in maiuscolo o in minuscolo. 


Attenzione 


Da questo punto in poi, non verrà richiesto tutte le volte di premere [RETURN]; si assumerà 
infatti che questo venga fatto automaticamente dall’utente. 
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GRAFICA 


Vi sono diversi simboli memorizzati in memoria: per visualizzarne uno si usa la parola 
chiave: 


chr$(). 


Nelle parentesi tonde deve essere inserito un numero compreso tra 32 e 255. 


Si riavvi il computer mantenendo premuti i tasti [CONTROL][SHIFT][ESC] e succes- 
sivamente si scriva: 


print chr$(250) 


Nonci si dimentichi di premere [RETURN]. Verrà visualizzato sullo schermo il carattere 
corrispondente al numero 250 che è un uomo che cammina verso destra. 


Per vedere sullo schermo tutti i caratteri associati ai numeri si scriva il seguente 
programma ricordandosi di premere [RETURN] al termine di ogni linea. 


10 for n=32 to 255 
20 print n;chr$(n); 
30 next n 

run 


L’elenco dei caratteri corrispondenti ai numeri ed i loro simboli è riportato nel capitolo 
‘Riferimenti’. 


LOCATE 


Questo comando è usato per posizionare il cursore in un punto specifico dello schermo. 
A meno che non sia stato modificato da un comando locate, il cursore viene posizionato 
nell’angolo in alto a sinistra dello schermo che corrisponde alle coordinate x,y 1,1 (x è 
la posizione orizzontale e y la verticale). In Mode 1 vi sono 40 colonne e 25 linee. Per 
posizionare, in Mode 1, il cursore al centro della prima linea si devono usare le coordinate 
20,1. 


Si scriva (ricordando di premere [RETURN] al termine di ogni linea): 
mode 1. _....... lo schermo viene pulito, ed il cursore posizionato in alto a sinistra 
10 locate 20,1 


20 print chr$(250) 
run 
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Per provare che il cursore si trova effettivamente sulla prima linea si scriva: 
border 0 

Il bordo sarà ora nero e si vedrà il simbolo dell’uomo in mezzo alla prima linea. 
In Mode 0 vi sono solo 20 colonne ma 25 linee. Se si scrive ora: 


mode 0 
run 


... sì vedrà che il simbolo dell’uomo appare nell’angolo in alto a destra dello schermo. 
Questo perchè in modalità 0 la coordinata 20 corrisponde all’ultima colonna. 


In Mode 2 vi sono 80 colonne e 25 linee. Usando lo stesso programma si potrà molto 
probabilmente immaginare dove apparirà ora l’uomo. Si scriva: 


mode 2 
run 


Si ritorni ora in modo Mode 1 scrivendo: 
mode 1 


Si provino a questo punto a fare degli esperimenti modificando i comandi locate e chr$() 
e variando la posizione dei caratteri nello schermo. A titolo di esempio si provi a scrivere: 


locate 20,12: print chr$(240) 
Si vedrà una freccia in mezzo allo schermo. Si noti che in questa istruzione: 


20 è la coordinata (x) orizzontale (nell’area 1- 40) 
12 è la coordinata (y) verticale (nell’area 1 - 25) 
240 è il numero corrispondente al simbolo (nell’area 32 - 255) 


Per visualizzare il simbolo corrispondente al numero 250 in tutto lo schermo si scriva il 
seguente programma: 


10 CLS 

20 FORx=1 TO 39 
30 LOCATE x,20 

50 PRINT CHR$(250) 
60 NEXT x 

70 GOTO 10 

run 


Per fermare il programma si prema due volte il tasto [ESC] 
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Per eliminare il carattere precedente prima di visualizzarne un altro si scriva: 
50 print “ “; chr$(250) 
(Tale linea sostituisce automaticamente la linea 50 precedentemente scritta). 


Si scriva ora: 


run 

FRAME 

Per migliorare il movimento del carattere nello schermo si aggiunga la seguente linea: 
40 frame 


Il comando FRAME sincronizza il movimento degli oggetti sullo schermo. Si ricordi che 
tale comando deve essere usato quando si vogliono far muovere i caratteri o le cifre sullo 
schermo in modo armonico. 


Questo programma può essere ulteriormente migliorato aggiungendo alcuni ritardi ed 
usando diversi simboli. 


Si scriva: 
list 
Si aggiungano ora le seguenti linee di programma: 


70 FORn=1 TO 300 : NEXT n 
80 FOR x = 39 TO 1 STEP-1 
90 LOCATE x,20 

100 FRAME 

110 PRINT CHR$(251);” “ 

120 NEXT x 

130 FORn=1 TO 300:NEXT n 
140 GOTO 20 

run 
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PLOT 


Diversamente dal comando LOCATE, PLOT è usato per determinare la posizione del 
cursore grafico usando le coordinate pixel (abbreviazione di picture element). Un pixel 
è un segmento molto piccolo sullo schermo. 


Si noti che il cursore grafico non è visibile ed è diverso dal cursore dei caratteri. 


Vi sono 640 pixel orizzontali e 400 verticali. Le coordinate x,y sono posizionate a partire 
dall’angolo in basso a sinistra dello schermo: tale punto ha coordinate 0,0. Contrari- 


amente al comando LOCATE le coordinate non differiscono nelle varie modalità (Mode 
0,102). 


Per vedere ciò si riavvi il computer mantenendo premuti i tasti 


[CONTROLI][SHIFT][ESC] e si scriva: 
plot 320,200 


In mezzo allo schermo verrà visualizzato un piccolo punto. 


Si modifichi ora il Mode scrivendo: 


mode 0 
plot 320,200 


Il punto sarà posizionato ancora in mezzo allo schermo ma è un po’ più grande. Si 
modifichi ancora la modalità e si scriva lo stesso comando per vederne l’effetto in Mode 
2. Si scriva: 


mode 2 
plot 320,200 


Il punto è ancora in centro ma ancora più grande. 
Per potersi rendere conto di persona dell’uso di tale comando si provi a posizionare 


diversi punti nello schermo nelle varie modalità. Al termine si ritorni in Mode 1 e si 
pulisca lo schermo scrivendo: 


mode 1 
DRAW 


Si riavvi a questo punto il computer mantenendo premuti i tasti 
[CONTROLI][SHIFT][ESC]. Il comando DRAW disegna una linea dalla posizione 
corrente del cursore grafico. Per vedere in dettaglio tale comando disegniamo un 
rettangolo sullo schermo usando il programma che segue. 


Iniziamo a far ciò posizionando il cursore grafico mediante un comando PLOT. 
Disegnamo poi una linea partendo dalla posizione del cursore e verso l’angolo in alto a 
sinistra, poi da questo punto verso l’angolo destro, ecc. 
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Si scriva: 


5 cls 

10 plot 10,10 

20 draw 10,390 
30 draw 630,390 
40 draw 630,10 
50 draw 10,10 
60 goto 60 

run 


Si prema due volte [ESC] per fermare il programma. 


Si noti la linea 60 di tale programma; il computer indica di eseguire continuamente il 
programma partendo dalla linea 60: ciò viene fatto fino a quando non si preme due volte 
il tasto [ESC]. Questo comando è utile quando non si vuol far terminare automaticamente 
il programma e quindi visualizzare il prompt Ready sullo schermo. 


Si aggiunga ora al programma le seguenti linee: si disegnerà all’interno del primo 
rettangolo un secondo. Si scriva: 


60 plot 20,20 

70 draw 20,380 
80 draw 620,380 
90 draw 620,20 
100 draw 20,20 
110 goto 110 
run 


Si prema due volte [ESC] per fermare il programma. 


MOVE 


Il comando MOVE opera in modo analogo al comando PLOT, il cursore grafico viene 
posizionato nelle coordinate x,y specificate; in questo caso comunque NON viene 
disegnato il punto. 


Si scriva: 


cls 
move 639,399 


Sebbene non si veda alcun segno sullo schermo il cursore si è spostato nell’angolo in alto 
a destra. 


Proviamo a disegnare una linea da quella posizione fino al centro dello schermo 
scrivendo: 


draw 320,200 
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CERCHI 


I cerchi possono essere sia posizionati sia disegnati. Un metodo per formare il cerchio 
consiste nel posizionare ogni punto x,y della circonferenza. Facendo riferimento alla 
figura sotto si può notare che il punto p della circonferenza può essere posizionato usando 
le coordinate x ed y. Queste sono: 


x= 190*cos(a) 
y = 190*sin(a) 


MARGINE 
DELLO SCHERMO 


200 


320 


Disegniamo i punti di un cerchio. 


Nel programma precedente abbiamo disegnato i punti del cerchio rispetto all’angolo in 
basso a sinistra dello schermo. Se ora vogliamo posizionare il cerchio in mezzo allo 
schermo dobbiamo porre il centro del cerchio alle coordinate 320,320 e successivamente 
tutti i punti del cerchio rispetto a tale posizione. 


Un tale programma potrebbe essere il seguente: 


new 

10 CLS 

20 DEG 

30 FOR a=1 TO 360 

40 MOVE 320,200 

50 DRAW 320+190*COS(a),200+190*SIN(a) 
60 NEXT 

run 
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Si noti l’uso della parola chiave NEW all’inizio del programma. Ciò indica al computer 
di pulire la memoria da qualsiasi programma (è un modo analogo a 
[CONTROL][SHIFT][ESC]). Tale comando, comunque, ‘svuota’ solo la memoria e 
non lo schermo. 


Il raggio del cerchio può essere ridotto diminuendo il valore 190 (ovvero il numero di 
pixel). 


Per vedere un diverso modo di posizionamento del cerchio (in radianti) si cancelli la linea 
20 del programma scrivendo: 


20 


Per vedere disegnato un cerchio mediante linee che partono dal centro si editi la linea 50 
e si sostituisca la parola plot con la parola draw. Tale linea dovrà essere come segue: 


50 draw 320+190*cos(a), 200+190*sin(a) 
Si provi ad apportare tale modifica e ad eliminare ancora la linea 20. 


Si potrà notare che, nella linea 60 di tale programma, invece dell’istruzione NEXT a si 
è usato solo NEXT. Ciò è possibile in quanto in tale programma esiste una sola istruzione 
NEXT; il computer esegue tutte le istruzioni comprese tra FOR ed il NEXT ad esso 
associato. In programmi contenenti diversi cicli FOR NEXT si potrebbe voler ag- 
giungere il nome della variabile dopo la parola NEXT al fine di identificare il corretto 
NEXT in fase di analisi del programma. 


ORIGIN 


Nel programma precedente abbiamo usato il comando MOVE per posizionare il centro 
di un cerchio e per aggiungervi le coordinate x,y. Invece di aggiungere tali coordinate al 
punto centrale disegnato è possibile usare il comando ORIGIN. Esso posizionerà il centro 
del cerchio e le coordinate di tutti i punti della circonferenza. Si provi a scrivere: 


new 

10 cls 

20 fora = 1 to 360 

30 origin 320,200 

40 plot 190*cos(a),190*sin(a) 
50 next 

run 
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Per disegnare quattro piccoli cerchi sullo schermo si scriva il seguente programma: 


new 

10 CLS 

20 FORa=1 TO 360 

30 ORIGIN 196,282 

40 PLOT 50*COS(a),50*SIN(a) 
50 ORIGIN 442,282 

60 PLOT 50*COS(a),50*SIN(a) 
70 ORIGIN 196,116 

80 PLOT 50*COS(a),50*SIN(a) 
90 ORIGIN 442,116 

100 PLOT 50*COS(a),50*SIN(a) 
110 NEXT 

run 


Per vedere un diverso modo di creazione di cerchi si scriva il seguente programma: 


new 

10 MODE 1 

20 ORIGIN 320,200 

30 DEG 

40 MOVE 0,190 

50 FOR a=0 TO 360 STEP 10 

60 DRAW 190*SIN(a),190*COS(a) 
70 NEXT 

run 


Questa volta viene disegnata una linea di coordinata in coordinata lungo tutta la 
circonferenza del cerchio. Si noti come il cerchio viene disegnato più velocemente. 


Si osservi ancora una volta l’effetto che si ottiene eliminando il comando DEG, 
cancellando la linea 30 ed eseguendo di nuovo il programma. 


FILL 


Il comando FILL viene usato per riempire un’area dello schermo racchiusa da un disegno 
o da un’angolo dello schermo grafico. 


Si riavvi il computer mediante i tasti [(CONTROL][SHIFT][ESC] e si scriva: 


new 
10 cls 

20 move 20,20 
30 draw 620,20 
40 draw 310,380 
50 draw 20,20 
run 
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Sullo schermo sarà possibile vedere un triangolo. Si sposti il cursore grafico in centro allo 
schermo scrivendo: 


move 320,200 


Usando la parola chiave FILL seguita dal numero di penna, ad esempio 3, riempiremo ora 
lo schermo usando la penna specificata e iniziando dalla posizione del cursore (centro 
dello schermo) fino al confine. Si scriva: 


fill 3 


Si sposti ora il cursore grafico fuori dal triangolo scrivendo: 
move 0,0 

Si guardi ora cosa accade scrivendo: 

fill 2 


Il computerha usato la penna numero 2 per riempire l’area compresa tra le linee disegnate 
e gli angoli dello schermo. 


Modifichiamo ora il programma scrivendo le seguenti linee: 


50 draw 50,50 
60 move 320,200 
70 fill 3 

run 


Si noterà che ogni apertura nei confini permetterà all’inchiostro di filtrare! 


Questo punto è dimostrato ulteriormente riempiendo prima un cerchio e poi disegnan- 
done un altro. Si scriva: 


new 

10 CLS 

20 FOR a=1. TO 360 

30 ORIGIN 320,200 

40 PLOT 190*COS(a),190*SIN(a) 
50 NEXT 

60 MOVE -188,0 

70 FILL 3 

run 
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Si scriva ora: 


new 

10 MODE 1 

20 ORIGIN 320,200 

30 DEG 

40 MOVE 0,190 

50 FOR d=0 TO 360 STEP 10 
60 DRAW 190*SIN(d),190*COS(d) 
70 NEXT 

80 MOVE -188,0 

90 FILL 3 

run 


Possiamo rendere il profilo del cerchio invisibile ponendo l’inchiostro della penna dello 
stesso colore dell’inchiostro della carta. Aggiungiamo: 


45 GRAPHICS PEN 2:INK 2,1 
run 


Il comando GRAPHICS PEN seleziona la penna da usare per disegnare il grafico sullo 
schermo. Il comando INK specifica il colore per tale penna che è, in questo caso, uguale 
a quella della penna (cioè il colore numero 1). 


Si scriva infine il seguente programma dimostrativo: 


new 

10 MODE 0:BORDER 13 

20 MOVE 0,200:DRAW 640,200 
30 FOR x=80 TO 560 STEP 80 
40 MOVE x,0:DRAW x,400 

50 NEXT:MOVE -40,300 

60 FOR c=0 TO 7 

70 MOVER 80,0: FILL c 

80 MOVER 0,-200:FILL c+8 

90 MOVER 0,200:NEXT 

100 GOTO 100 

run 


I colori dell’area riempita possono essere modificati scrivendo: 


100 SPEED INK 30,30 

110 BORDER RND*26,RND*26 

120 INK RND*15,RND*26,RND*26 

130 FOR t=1 TO 500:NEXT:GOTO 110 
run 
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Ulteriori dettagli... 


Per un ulteriore approfondimento sulla grafica del CPC6128 si consulti il paragrafo 
‘Parliamo della grafica’ nel capitolo ‘A vostra disposizione”. 


Per concludere questo paragrafo seguono alcuni programmi dimostrativi che includono 
molti comandi e parole chiave la cui conoscenza è molto utile. Tali programmi disegnano 
continuamente oggetti sullo schermo. 


new 

10 BORDER 0:GRAPHICS PEN 1 

20 m=CINT(RND*2):MODE m 

30 i1=RND*26:i12=RND*26 

40 IF ABS(i1-i2)<10 THEN 30 

50 INK 0,i1:INK 1,i2 

60 s=RND*5+3:ORIGIN 320,-100 

70 FOR x=-1000 TO 0 STEP s 

80 MOVE 0,0:DRAW x,300:DRAW 0,600 
90 MOVE 0,0:DRAW -x,300:DRAW 0,600 
100 NEXT:FOR t=1 TO 2000:NEXT:GOTO 20 
run 


10 MODE 1:BORDER 0:PAPER 0 
20 GRAPHICS PEN 2: INK 0,0:i=14 
30 EVERY 2200 GOSUB 150 

40 indice=0:CLG 

50 INK 2,14+RND*12 

60 b%=RND*5+1 

70 c%=RND*5+1 

80 ORIGIN 320,200 

90 FOR a=0 TO 1000 STEP PI/30 
100 x%=100*COS(a) 

110 MOVE Xho,Y% 

120 DRAW 200*COS(a/b%),200*SIN(a/c%) 
130 IF indice=1 THEN 40 

140 NEXT 

150 indice=1:RETURN 

run 
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10 MODE 1:BORDER 0:DEG 

20 PRINT “Attendere per favore” 

30 FOR n=1 TO 3 

40 INK 0,0:INK 1,26:INK 2,6:INK 3,18 

50 IF n=1 THEN sa=120 

60 IF n=2 THEN sa=135 

70 IF n=3 THEN sa=150 

80 IF n=1 THEN ORIGIN 0,-50,0,640,0,400 ELSE ORIGIN 0,0,0,640,0,400 
90 DIM cx(5),cy(5),r(5),Ic(5) 

100 DIM np(5) 

110 DIM px%(5,81),py%(5,81) 

120 st=1:cx(1)=320:cy(1)=200:r(1)=80 
130 FOR st=1 TO 4 

140 r(st+1)=r(st)/2 

150 NEXT st 

160 FOR st=1 TO 5 

170 Ic(st)=0:np(st)=0 

180 np(st)=np(st)+1 

190 px%(st,np(st))=r(st)*SIN(Ic(st)) 

200 py%(st,np(st))=r(st)*COS(Ic(st)) 

210 lc(st)=Ic(st)+360/r(st) 

220 IF Ic(st) < 360 THEN 180 

230 px%(st,np(st)+1)=px%(st,1) 

240 py%(st,np(st)+1)=py%(st,1) 

250 NEXT st 

260 CLS:cj=REMAIN(1):cj;=REMAIN(2) 
270 c;=REMAIN(3):INK 1,2:st=1 

280 GOSUB 350 

290 LOCATE 1,1 

300 EVERY 25,1 GOSUB 510 

310 EVERY 15,2 GOSUB 550 

320 EVERY 5,3 GOSUB 590 

330 EVERY cx,cy,r,lc,n0,px%,py%:NEXT 
340 GOTO 340 

350 cx%=Cx(st):cy%=cCcy(st):lc(st)=0 

360 FOR x%=1 TO np(st) 

370 MOVE cx%,cy% 

380 DRAW cx%+px%(st,x%),cy%+py%(st,x%),1+(st MOD 3) 
390 DRAW cx%+px%(st,x%+1),Cy%+py%(st,x%+1),1+(st MOD 3) 
400 NEXT x% 

410 IF st-5 THEN RETURN 

420 lc(st)=0 

430 cx(st+1)=cx(st)+1.5*r(st)*SIN(sa+Ic(st)) 


Questo programma continua nella prossima pagina. 
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440 cy(st+1)=cy(st)+1.5*r(st)*COS(sa+lc(st) 
450 st=st+1 

460 GOSUB 350 

470 st=st-1 

480 lc(st)=lIc(st)+2*sa 

490 IF (Ic(st) MOD 360)<>0 THEN 430 
500 RETURN 

510 ik(1)=1+RND*25 

520 IF ik(1)=ik(2) OR ik(1)=ik(3) THEN 510 
530 INK 1,ik(1) 

540 RETURN 

550 ik(2)=1+RND*25 

560 IF ik(2)=ik(1) OR ik(2)=ik(3) THEN 550 
570 INK 2, ik(2) 

580 RETURN 

590 ik(3)=1+RND*25 

600 IF ik(3)=ik(1) OR ik(3)=ik(2) THEN 590 
610 INK 3,ik(3) 

620 RETURN 


Corso Introduttivo 
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Parte 9: Uso del Suono... 


Gli effetti sonori sono generati da un altoparlante incorporato nel computer. Se si sta 
usando un modulatore/alimentatore MP2 e un televisore domestico si porti il volume di 
quest’ultimo al minimo. 


Il livello del suono può essere regolato per mezzo del controllo di VOLUME posto sul 
retro del computer. E° possibile inoltre collegare l’uscita STEREO del computer a quella 
del proprio stereo. Ciò permetterà di sentire il suono emesso dal computer attraverso le 
casse acustiche del proprio stereo o mediante cuffia. Ulteriori informazioni sulla 
connessione di tale presa STEREO verranno fornite nella parte 2 di questo manuale. 


Il comando SOUND 


Il comando SOUND ha sette parametri. I primi due devono essere specificati; gli altri 
sono opzionali. Il comando deve essere scritto come: 


SOUND <stato del canale>, <periodo della nota>, <durata>, <volume>, <inviluppo del 
volume>, <inviluppo del tono>, <periodo di rumore>. 


Sembra complicato, ma se si analizza ogni parametro, si potrà notare che non è così. 
Guardiamo ad uno ad uno tutti i parametri... 


Stato del canale 


Per mantenere le cose più semplici possibili si guardi allo stato del canale come ad un 
numero del canale sonoro. Vi sono tre canali; per il momento useremo lo stato di canale 
numero 1. 


Periodo della nota 


Il periodo della nota è un modo tecnico per definire la tonalità del suono o, in altre parole, 
“la nota” (cioè do re mi fa, ecc.). Ogni nota ha associato un numero e tale numero è il 
periodo della nota. Facendo riferimento al capitolo ‘Riferimenti’ si vedrà che la nota DO 
centrale ha un periodo di 239. 
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Si riavvi il computer premendo i tasti [CONTROL][SHIFT][ESC] e si scriva: 


10 sound 1,239 
run 


Si udirà una breve nota corrispondente al DO centrale della durata di 0,2 secondi. 


Se non si sente alcun suono ci si assicuri che il controllo di VOLUME del computer non 
sia a zero. Si riscriva il programma precedente e lo si esegua (run). 


Durata 


Questo parametro fissa la lunghezza del suono, in altre parole ‘la durata’. Il parametro 
opera in unità di 0.01 (un centesimo) secondi; se non si specifica la durata questa sarà pari 


a 20: questa è la ragione per cui le note udite durano 0.2 secondi, cioè 0.01 moltiplicato 
per 20. 


Per far durare una nota 1 secondo si deve usare 100; per 2 secondi si deve usare 200. Si 
scriva: 


10 sound 1,239,200 
run 


Si udirà la nota Do centrale per la durata di 2 secondi. 
Volume 


Questo parametro specifica il volume iniziale della nota. Il numero può essere compreso 
tra 0 e 15. Il volume 0 è il minimo, mentre 15 è il massimo. Se non si specifica alcun 
numero viene assunto per difetto 12. Si scriva: 


10 sound 1,239,200,5 
run 


Si noti il volume di tale suono. Lo si riscriva ora aumentano il volume: 


10 sound 1,239,200,15 
run 


Si potrà notare che tale volume è molto più alto. 
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Inviluppo del volume 


AI fine di far variare il volume all’interno della durata della nota è possibile specificare 
un inviluppo del volume usando un diverso comando: ENV. E’ possibile infatti creare 
diversi inviluppi di volume e, come nel comando SOUND, ogni inviluppo ha un numero 
di riferimento. Se si è creato un inviluppo di volume con numero di riferimento 1 e lo si 


desidera usare nel comando SOUND, quando viene richiesto il parametro “inviluppo del 


volume” si scrive 1. Tra breve verrà fornita la spiegazione riguardante la creazione 
dell’inviluppo del volume. 


Inviluppo del tono 


AI fine di far variare il tono all’interno della durata della nota è possibile specificare un 
inviluppo del tono usando un diverso comando: ENT. E” possibile infatti creare diversi 
inviluppi di tono e, come nel comando SOUND, ogni inviluppo ha un numero di 
riferimento. Se si è creato un inviluppo di tono con numero di riferimento 1 e lo si desidera 
usare nel comando SOUND, quando viene richiesto il parametro “inviluppo del tono” 
si scrive 1. Tra breve verrà fornita la spiegazione riguardante la creazione dell’inviluppo 
del tono. 


Rumore 

“Rumore” è l’ultimo parametro del comando SOUND. La gamma di rumori disponibili 
è compresa tra 1 e 31. Si provi ad aggiungere alla fine del comando sound il numero di 
rumore 2 e si sentano gli effetti. Si modifichi il numero di “rumore” ponendolo a 27 e si 


senta la differenza. Si scriva: 


10 sound 1,239,200,15,,,2 


Si notino i due parametri ‘nulli’ (,,,) prima del parametro 2. Questo è dovuto al fatto che 
hon si è creato un <inviluppo di volume> e nemmeno un <inviluppo di tono>. 


Creazione di un inviluppo di volume. 


Il comando di inviluppo del volume è ENV. Nella forma più semplice tale comando ha 
4 parametri. Il comando viene scritto come: 


ENV <numero di inviluppo>, <numero di passi>, <ampiezza del passo>, <tempo del 
passo>. 


Analizziamone uno alla volta. 
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Numero dell’inviluppo 


E’ un numero di riferimento (compreso tra 0 e 15) dato ad un particolare inviluppo di 
volume richiamabile in un comando SOUND. 


Numero di passi 


Questo parametro specifica i differenti passi di volume prima del termine del suono. In 
una nota, ad esempio, della durata di 10 secondi, si potrebbero volere 10 passi di volume 
di 1 secondo ciascuno. In tal caso, il parametro <numero di passi> deve essere 10. 


La gamma di tali numeri è compresa tra 0 e 127. 
Ampiezza dei passi 


Ogni passo può variare in ampiezza da un livello di volume compreso tra 0 e 15 tenendo 
conto dell’ultimo passo. I 16 differenti livelli di volume sono uguali a quelli del comando 
SOUND. La gamma di ampiezza di tali numeri varia da -128 a +127; il livello di volume 
ritorna a zero ogni volta raggiunge valore 15. 


Tempo del passo 


Questo numero specifica l’unità di tempo intercorrente tra due passi in 0,001 secondi (1/ 
100esimo di secondo). La gamma di tale passo varia da 0 a 256 ciò significa che il tempo 
più lungo tra i passi è quindi di 2.56 secondi (0 viene trattato come 256). 


Si noti comunque, che il parametro <numero di passi> moltiplicato per il <tempo del 
passo>, in un comando SOUND, non deve essere maggiore della <durata>; in caso 
contrario, il suono terminerà prima che siano stati effettuati tutti i passi di volume (in tal 
caso i passi di volume eccedenti verranno scaricati). 


Inoltre se, in un comando SOUND, il parametro <durata> è maggiore del <numero di 
passi> moltiplicato per il <tempo del passo> il suono continuerà anche quando sono stati 
effettuati tutti i passi di volume e rimarrà constantemente sul livello finale. 


A titolo di esperimento, si provi a scrivere il seguente programma: 


10 env 1,10,1,100 
20 sound 1,142,1000,1,1 
run 
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La linea 20 specifica un suono con periodo della nota di 142, di durata 10 secondi con 
volume iniziale di 1, un inviluppo di volume pari a 1, composto da 10 passi, con aumento 
di volume ad ogni passo 1, ogni secondo (100x0,01 secondi). 


Si modifichi la linea 10 in ognuno dei seguenti modi e si esegua ogni volta il programma 
per sentire l’effetto di modifica dell’inviluppo. 


10 env 1,100,1,10 
10 env 1,100,2,10 
10 env 1,100,4,10 
10 env 1,50,20,20 
10 env 1,50,2,20 

10 env 1,50,15,30 


Ed infine si provi la seguente: 


10 env 1,50,2,10 


Si sarà notato che dimezzando il suono il livello resta costante. Questo perchè il numero 
di passi era 50 ed il tempo per ogni passo pari a 0,1 secondo. Del resto, la lunghezza 
dell’ampiezza variava solo di 5 secondi mentre la durata del suono nel comando SOUND 
nella linea 20 era pari a 1000 cioè 10 secondi. 


Si provi ad effettuare delle prove per vedere il tipo di suono che si riesce a creare. 
Se si desidera creare un inviluppo di volume più complicato i 3 parametri: <numero di 


passi>, <ampiezza del passo> e <tempo del passo> possono essere ripetuti alla fine di 


ogni comando ENV fino a quattro volte, per specificare una differente ‘sezione’ dello 
stesso inviluppo. 


Creazione di un inviluppo del tono 


Il comando di inviluppo del tono è ENT. Nella forma più semplice, il comando ha quattro 
parametri. Il comando viene scritto come: 


ENT <numero di inviluppo>, <numero di passi>, <ampiezza della nota>, <tempo del 
passo>. 


Numero dell’inviluppo 


Questo è un numero di riferimento (tra 0 e 15) di un particolare inviluppo: può essere 
quindi specificato nel comando SOUND. 
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Numero di passi 


Questo parametro specifica quanti passi di tono devono essere eseguiti prima che termini 
il suono. In una nota, ad esempio, della durata di dieci secondi, si potrebbero volere dieci 
passi di tono; cioè uno ogni secondo. In questo caso il parametro <numero di passi> deve 
essere uguale a dieci. 


La gamma di tali numeri è compresa tra 0 e 239. 


Ampiezza della nota 


Ogni passo di tono può variare tra -128 e +127 tenendo conto dell’ultimo passo. I passi 
negativi incrementano la frequenza della nota; quelli positivi la decrementano. L’am- 
piezza minore equivale a 0. Questo deve essere ricordato quando si calcola l’inviluppo 
di tono. La gamma completa del periodo del tono è riportata nel capitolo ‘Riferimenti’. 


Tempo del passo 


Questo numero specifica l’unità di tempo intercorrente tra due passi in 0,001 secondi (1/ 
100esimo di secondo). La gamma di tale passo varia da 0 a 255 ciò significa che il tempo 
più lungo tra i passi è quindi di 2.56 secondi (0 viene trattato come 256). 


Si noti comunque, che il parametro <numero di passi> moltiplicato per il <tempo del 
passo>, in un comando SOUND, non deve essere maggiore della <durata>, in caso 
contrario, il suono terminerà prima che siano stati effettuati tutti i passi di tono (in tal caso 
i passi di tono eccedenti verranno scaricati). 


Inoltre, se in un comando SOUND, il parametro <durata> è maggiore del <numero di 
passi> moltiplicato per il <tempo del passo> il suono continuerà anche quando sono stati 
effettuati tutti i passi di tono e rimarrà constantemente sul livello finale. 


A titolo di esperimento, si provi a scrivere il seguente programma: 


10 ent 1,100,2,2 
20' sound 1,142,200,15,,1 
run 


La linea 20 specifica un suono con periodo della nota di 142, di durata 2 secondi con' 
volume iniziale di 15 (massimo), senza inviluppo di volume (rappresentato dal parametro 
nullo ,,) e con inviluppo della nota pari a 1. 


La linea 10 ha numero di inviluppo della nota uguale a 1 formato da 100 passi, con 
incremento del periodo della nota (riduzione della frequenza) di 2 ogni 0,02 secondi 
(2x0.01 secondi). 
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Si modifichi la linea 10 in ognuno dei seguenti modi e si esegua ogni volta il programma 
per sentire l’effetto di modifica dell’inviluppo. 

10 ent 1,100,-2,2 

10 ent 1,10,4,20 

10 ent 1,10,-4,20 


Ora si sostituisca il comando sound e l’inviluppo della nota scrivendo: 


10 ent 1,2,17,70 

20 sound 1,71,140,15,,1 
30 goto 10 

run 


Si prema il tasto [ESC] due volte per fermare il programma. 


Ora è possibile porre in un comando sound l’inviluppo del volume, e l’inviluppo della 
nota per creare diversi suoni. Si scriva: 


new 
10 env 1,100,1,3 

20 ent 1,100,5,3 

30 sound 1,142,300,1,1,1 
run 


Si sostituisca a questo punto la linea 20 scrivendo: 


20 ent 1,100,-2,3 
run 


Si sostituiscano ora tutte le linee scrivendo: 


10 env 1,100,2,2 

20 ent 1,100,-2,2 

30 sound 1,142,200,1,1,1 
run 


Se si desidera creare un inviluppo di tono più complicato i 3 parametri: <numero di passi>, 
<ampiezza del passo> e <tempo del passo> possono essere ripetuti alla fine di ogni 
comando ENT fino a quattro volte, per specificare una differente ‘sezione’ dello stesso 
inviluppo. 


Si provino ad effettuare delle variazioni. Si provi ad aggiungere, nel comando SOUND, 
del <rumore> ed alcuni parametri all’inviluppo del volume e a quello del tono. 

Il capitolo ‘Complete list of AMSTRAD CPC6128 BASIC Keywords” contiene tutti i 
dettagli sui vari comandi relativi al suono. Se si è interessati a questo aspetto si veda il 
paragrafo "Il Sound della Musica” nel capitolo ‘A vostra disposizione”. 
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Parte 10: Introduzione ad AMSDOS e 
CP/M... 


Cos’è AMSDOS? 


Quando un computer viene acceso o riavviato, il sistema esegue automaticamente 
‘AMSDOS’. AMSDOS è l’abbreviazione di AMstrad Disc Operation System (Disco di 
sistema operativo AMSTRAD) e permette di usare i seguenti comandi e funzioni per il 
trattamento dei file: 


LOAD “nome file” 
RUN “nome file” 
SAVE “nome file” 
CHAIN “nome file” 
MERGE “nome file” 
CHAIN MERGE “nome file” 
OPENIN “nome file” 
OPENOUT “nome file” 
CLOSEIN 
CLOSEOUT 

CAT 

EOF 

INPUT #9 

LINE INPUT #9 

LIST #9 

PRINT #9 

WRITE #9 


AMSDOS fornisce inoltre diversi comandi per il trattamento dei dischi. 


Tali comandi sono detti comandi esterni e sono preceduti dal simbolo di barra verticale 
| (è possibile ottenere tale simbolo mantenendo premuto il tasto [SHIFT] e premendo il 


tasto @). 


Alcuni dei comandi esterni che useremo comunemente sono: 


|a 
Ib 
Itape (che può essere suddiviso in |tape.in e |tape.out) 
|disc (che può essere suddiviso in |disc.in e |disc.out). 


I comandi |a e |b sono usati su sistemi a due drive per indicare al computer il drive al quale 
inviare comandi. 
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Scrivendo ad esempio: 


|a 
load “nome file” 


... SÌ indica al computer di caricare il programma specificato dal disco posto nel Drive A. 


Se non viene inserito nè |a nè |b o si è riavviato il computer, il sistema assumerà come 
drive per difetto il Drive A. 


Se si sta usando solo il drive all’interno del computer si può farvi riferimento come Drive 


A, non è necessario usare i comandi |a e |b. Nel caso si invii il comando lb quando non 
vi è un ulteriore drive connesso si riceverà, sullo schermo, il seguente messaggio: 


Drive B: disc missing 
Retry, Ignore or Cancel 


(ovvero: Drive B: disco mancante 
Riprova, Ignora o Cancella) 


al quale occorre rispondere C (per Cancellare). 
Cosa fare se si vuole usare una cassetta?... 


Il comando [tape indica al computer di eseguire le operazioni di caricamento e il 
salvataggio ecc. su una unità a cassette esterna invece che sul disco. Se non viene inserito 
il comando Itape, tutte le volte che il computer viene acceso o riavviato assumerà per 
difetto il disco. 


Per far riferimento al disco dopo aver specificato una operazione [tape si scriva: 
|disc 


Si potrebbe, ad esempio, caricare informazioni da una cassetta e salvarle su disco. Si 
potrebbe usare quindi il comando: 


Itape.in 


Questo comando indica al computer di leggere i dati da una cassetta, ma di continuare a 
scrivere (per difetto) i dati su disco. 


In modo analogo, per leggere i dati da disco e salvarli su cassetta, sarà necessario scrivere: 
|disc.in per annullare il comando Itape.in inviato precedentemente, poi: Itape.out per 
indicare al computer di scrivere i dati su cassetta. 


Si sarà potuto notare che |tape.in e |tape.out annullano rispettivamente |disc.in e 
|disc.out, e viceversa. 


Ulteriori informazioni sulla ridirezione sui e dai dischi (e cassette) verranno trovate nei 
capitoli ‘Uso di dischi e cassette’ e ‘AMSDOS e CP/M'° (Capitoli 4 e 5). 
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Copia di programmi tra dischi e cassette. 


Nella parte 7 del corso introduttivo abbiamo appreso come formattare un disco vergine 
usando il programma DISCKIT3 sul lato 1 (Size 1) del disco di sistema CP/M. Abbiamo 


inoltre appreso come copiare un programma da un disco in un altro. Ora, usando i 
comandi: 
Itape [disc |tape.in |tape.out |disc.in |disc.out |a |b 


... Saremo in grado di salvare o caricare su un disco posto nel Drive A o nel Drive B (se 
connesso) o su una unità a cassette (se connessa). 


I comandi esterni: 
|dir |drive |era |ren |user 


.. Vengono spiegati successivamente in questo manuale, nel capitolo ‘AMSDOS e CP/ 
M?’ (Capitolo 5). 


Copia di un intero disco 


E’ possibile copiare il contenuto di un intero disco su un altro usando il programma 
DISCKIT8 del lato 1 (Size 1) del disco di sistema CP/M. 


E’ possibile usare tale metodo per effettuare copie di riserva dei dischi di sistema originali 
stessi. 


Si inserisca il lato 1 (Size 1) del disco di sistema nel drive e si scriva: 
|cpm 

Dopo il prompt A> si scriva: 

disckit3 


Dopo pochi secondi si vedrà in alto sullo schermo il messaggio iniziale di DISC KIT 
seguito immediatemente dal seguente: 


One drive found 
(Ovvero: Trovato un drive). 
Questo messaggio indica che il computer sta eseguendo il programma di utilità DISC KIT 


e che ha scoperto che si sta operando con un solo drive (quello all’interno del computer). 
Se si è connesso un drive addizionale il messaggio sarà: 
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Two drive found 
(Ovvero: Trovati due drive) 


In fondo allo schermo si potrà vedere ciò che segue: 


Copy 
Format 
Verify 


Exit from program 


Questo è il menù principale di DISC KIT. I numeri dei quadrati fanno riferimento ai tasti 


funzione situati sulla destra della tastiera (contrassegnati con f0, f1, f4 e f7); scegliendo 
uno di tali tasti si seleziona la scelta corrispondente del menù. 


Si noti che premendo a questo punto il tasto f0 si esce dal programma DISC KIT e si torna 
in ambiente CP/M (verrà visualizzato il prompt A>). 


Vogliamo a questo punto copiare un disco, si prema quindi il tasto corrispondente alla 
funzione 7 (f7). 


ATTENZIONE 


LA COPIA IN UN DISCO REGISTRATO PRECEDENTEMENTE COMPORTA 
LA CANCELLAZIONE DI TUTTO IL SUO CONTENUTO 


Copia di un sistema ad un solo drive 


Assumendo che si stia usando un sistema ad un solo drive (cioè NON si sia connesso un 
ulteriore drive), si vedrà sullo schermo il seguente messaggio: 


(ovvero Y Copia 
qualsiasi tasto per uscire dal menù) 


Any other key to exit menu 


A questo punto occorre togliere il disco originale CP/M ed inserire il disco del quale si 
vuole effettuare la copia. Se si desidera copiare il disco di sistema CP/M lo si lasci 
all’interno del drive. 
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Quando il disco di cui si vuole effettuare la copia è nel drive, si prema il tasto Y (Y per 
Yes ovvero Sì indica di proseguire l’operazione di copia). 


Verrà esaminato il formato del disco e visualizzato, a titolo informativo, sullo schermo 
in alto. 


Subito dopo verrà visualizzato il seguente messaggio: 


Insert disc to Write (ovvero: Inserire un disco da Scrivere 
Press any key to continue Si prema un qualunque tasto per continuare) 


A questo punto occorre togliere dal drive il disco di cui si vuole fare la copia ed inserire 
il disco su cui si desidera copiare le informazioni e premere un qualsiasi tasto. 


Verrà esaminato il formato del disco e visualizzato (anche se non è formattato), a titolo 
informativo, sullo schermo in alto. 


Se il disco su cui si vuole copiare l’informazione non è formattato correttamente (o non 
lo è del tutto) in fase di copia verrà visualizzato il seguente messaggio: 


Disc isn't formatted (or faulty) (ovvero: Disco non formattato (o difettoso) 
Going to format while copying Formattazione in fase di copia 
Disc will be system format Il disco verrà formattato in formato sistema) 


.. 0 uno simile a seconda dei dischi che si stanno copiando. 


Quando il computer è di nuovo pronto per leggere altre informazioni dal disco originale 
visualizzerà il seguente messaggio: 


Insert disc to READ (ovvero: Inserire il disco da leggere 
Press any key to continue Si prema un qualunque tasto per continuare) 


... ed occorre reinserire il disco che si vuole copiare. 


Dopo aver ripetuto questo processo diverse volte, il contenuto del primo disco sarà stato 
copiato nel secondo, ed il messaggio: 


Copy completed (Ovvero: copia completata 
Remove disc togliere il disco 
Press any key to continue premere un qualunque tasto per continuare) 


... verrà visualizzato sullo schermo dopo del quale si devono seguire le istruzioni sullo 


schermo, che danno la possibilità di copiare un altro disco (premendo Y) o ‘exit’ (uscire) 
dal menù principale di DISC KIT. 
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Protezione da scrittura 


Non sarà possibile copiare informazioni su un disco se questo possiede il foro di 
protezione dalla scrittura aperto, nel qual caso verrà visualizzato il seguente messaggio: 


Disc write-protected 

Insert disc to WRITE 

R-etry or C-ancel 

(ovvero: Disco protetto da scrittura 
Inserire un disco da Scrivere 
R-iprova o C-ancella) 


.. è occorrerà scrivere C per Cancellare, si dovrà togliere il disco ed inserire il disco esatto 
su cui copiare, il quale deve avere il foro di protezione dalla scrittura chiuso. 


Ci si assicuri di non chiudere il foro di protezione dalla scrittura in un disco di cui si 


vogliono tenere i programmi e di non chiudere MAI il foro di protezione dalla scrittura 
del disco di sistema CP/M. 


Copia su un sistema a due drive. 


Si seguano le istruzioni fornite precedentemente, caricando il programma DISCKIT8 dal 
lato 1 (Size 1), si selezioni poi l’opzione Copy nel menù principale di DISC KIT 
premendo il tasto funzione f7. 


A questo punto verrà visualizzato sullo schermo un ulteriore menù: 


Read from A: 
Read from B: 


Exit menu 


Nella copia in un sistema a doppio drive non si deve ripetutamente inserire e togliere 
dischi dal drive per leggervi o copiarvi. Il menù precedente permette di selezionare il 
drive nel quale si vuole porre il disco che si vuole copiare. Si preme il tasto f8 per copiare 
dal disco posto nel Drive A. 
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Verrà visualizzato un terzo menù: 


Write to A: 


Write to B: 


Exit menu 


Questo menù permette di scegliere il drive nel quale copiare il disco. Si può, se si desidera, 
selezionare lo stesso drive selezionato precedentemente, ma in tal caso si dovrà ripetu- 
tamente cambiare i dischi non sfruttando la possibilità di un sistema a due dischi. 


Per maggiore comodità e velocità di copia si prema f6 per copiare nel disco posto nel 
Drive B. 


Ora si inseriscano i dischi nei drive appropriati e si prema Y per iniziare il processo di 
copia. 


Anche in questo caso verranno visualizzate informazioni riguardo i dischi e, se il disco 
su cui va effettuata la copia non è formattato correttamente (o non lo è del tutto), ciò viene 
fatto in fase di copia. 


Dopo la copia verrà visualizzato il seguente messaggio: 


Copy completed (Ovvero: Copia completata 
Remove both discs Rimuovere i entrambi i dischi 
Press any key to continue Premere un qualsiasi tasto per continuare) 


... ed occorre estrarre ENTRAMBI i dischi prima di eseguire ulteriori operazioni. Si può 


ripetere il processo di copia premendo il tasto Y oppure si può uscire dal menù principale 
di DISC KIT premendo un qualsiasi tasto. 


Verifica dei dischi 


Il programma DISCKIT3 permette inoltre di verificare (controllare) un disco. 
Vengono visualizzate sullo schermo tutte le informazioni del disco e vengono letti tutti 
i file del disco. 


Qualsiasi errore presente nei file viene riportato sullo schermo. 
Per verificare un disco si inserisce il lato 1 (Size 1) del disco di sistema e si scrive: 


icom 
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AI prompt A> si scrive: 
disckit3 


Si seleziona l’opzione Verify del menù principale di DISC KIT (tasto f1) e si seguono le 
istruzioni presenti sullo schermo. 


Se si possiede un sistema a due drive viene fornita la possibilità di scegliere il Drive A 
o il Drive B. 


Quando il disco che si vuole controllare è stato inserito nel drive si preme Y. 


Quando la verifica è stata completata sullo schermo appare il seguente messaggio: 


Verify completed (Ovvero: Verifica completata 
Remove disc Togliere il disco 
Press any key to continue Premere un qualsiasi tasto per continuare). 


Se si possiede un sistema a doppio drive verrà richiesto di estrarre ENTRAMBI i dischi 
prima di eseguire ulteriori operazioni. Si può ripetere il processo di verifica premendo il 
tasto Y oppure si può uscire dal menù principale di DISC KIT premendo un qualsiasi 
tasto. 


Uso del programma DISC KIT su CP/M 2.2 


Se si desidera formattare, copiare o verificare i dischi creati sul o per il CPC464 o 
CPC464+DDI (che usano entrambi il CP/M2.2), viene fornito un programma DISC KIT 
a tale scopo; tale programma è reperibile sul lato 4 (Size 4) dei dischi del sistema 
operativo. Il nome del programma è DISCKIT2 ed opera come DISCKIT3. 


Per eseguire DISCKIT?2 si inserisca il lato 4 (Size 4) del disco di sistema nel drive e si 
scriva: 


[cpm 
Quando, sullo schermo, appare il prompt A> del CP/M 2.2 si scriva: 
disckit2 


Da questo momento in poi si possono selezionare le opzioni dal menù e seguire le 
istruzioni visualizzate come descritto per DISCKIT3. 


NOTA: In fase di copia il programma DISCKIT?2 utilizza la memoria dello schermo per 
i dati. In tale fase si vedranno apparire sullo schermo e in modo casuale dei caratteri. 
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Ulteriori informazioni 


Ulteriori informazioni sull’uso dei programmi forniti su dischi di sistema CP/M si 
troveranno nei Capitoli 4 e 9. 


Si controlli inoltre di aver seguito attentamente le istruzioni fornite all’inizio di questo 
manuale, nel paragrafo intitolato ‘IMPORTANTE’: 


NOTE DI INSTALLAZIONE 5,6,7 
NOTE OPERATIVE 1,2,3,4,5,6,7,9 
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Parte 11: Introduzione al Bank 
Manager... 


Uso del secondo gruppo di 64k di memoria 


Il CPC6128 contiene 128K di RAM (Random Access Memory) suddivisa in due lotti di 
64k. CP/M Plus usa sempre 128K mentre BASIC non usa normalmente il secondo lotto 
di 64K: la sola memoria disponibile è quindi il primo lotto di 64K. Sarebbe davvero un 
peccato lasciare questi 64K inutilizzati in fase di esecuzione di BASIC: per questo motivo 
viene fornito un particolare programma che permette un uso speciale di tale memoria. Il 
programma mette a disposizione alcuni comandi che rendono possibile l’uso del secondo 
lotto di 64K di RAM così come uno spazio di memoria per le immagini dello schermo 
o come uno spazio di memoria per le stringhe. 


Il programma che mette a disposizione questi comandi si chiama “BANK MANAGER” 
dove “bank” è un termine tecnico usato per descrivere una parte di memoria. 


Uso di BANK MANAGER per la gestione delle immagini. 


Il 6128 visualizza uno schermo alla volta. Per far ciò necessita di 16K di memoria nel 
quale memorizza le informazioni riguardo il colore e la luminosità di ogni pixel (punto) 
sullo schermo. La memoria del 6128 permette di memorizzare un massimo di sei 
immagini contemporaneamente (ogni immagine è memorizzata su 16K). BANK 
MANAGER permette di impostare e visualizzare almeno cinque dei sei schermi possibili 
di BASIC. 


Quando si accende il computer, lo schermo visualizzato proviene da un blocco di 16K di 
memoria (chiamato “Blocco 1’) del primo lotto di 64K. Gli altri quattro schermi sono 
situati nel secondo lotto di 64K e sono chiamati Blocco 2, Blocco 3, Blocco 4 e Blocco 
5. 


Solo il Blocco 1 (dei primi 64K) può essere visualizzato sullo schermo. Per vedere uno 
schermo memorizzato nel secondo lotto di 64K (Blocco 2 fino a 5) è necessario spostare 
lo schermo richiesto nel Blocco 1. II BANK MANAGER fornisce tutti i comandi 
necessari a spostare gli schermi come ad esempio il comando |SCREENCOPY che 
sposta uno schermo su un altro, sovrascrivendo in tal modo lo schermo su cui viene posto; 
e |SCREENSWAP che scambia i contenuti di due schermi. 


Come i comandi di AMSDOS introdotti precedentemente, anche BANK MANAGER 
utilizza i “comandi esterni” i quali iniziano con il simbolo di barra verticale (ottenuta 


premendo [SHIFT]@). 
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Come usare BANK MANAGER 


Si riavvii il computer premendo [CONTROL][SHIFT][ESC], si inserisca quindi il lato 
1 (Size 1) del disco di sistema e si scriva: 


RUN “BANKMAN” 
La procedura di caricamento su RSX (Resident System eXtensions) è descritta in 
dettaglio nel Capitolo 7 parte 13; si consiglia, prima di usare tali routine all’interno di un 


programma, di conoscere la procedura RSX e lo spazio di memoria riservato. Comunque, 
per gli esempi che seguono, non è necessario conoscere la procedura di ca-ricamento. 


Si scriva: 
MODE 1 


PRINT “QUESTO E’ LO SCHERMO PER DIFETTO” 
|[SCREENSWAP,1,2 


Il testo dovrebbe essere sparito; ciò che si vede sullo schermo è quello che è memorizzato 
come Schermo 2 (nel Blocco 2). Se il computer è stato appena acceso, ciò che si vede sullo 
schermo è stato determinato in modo casuale. Per calcellarlo si scriva: 


MODE 1 


PRINT “QUESTO E’ LO SCHERMO 2” 
|SCREENSWAP1,2 


Riapparirà il testo iniziale. Se ora si ripete il comando |\SCREENSWAP,1,2 si può 
vedere che il contenuto dei due schermi è cambiato. E’ possibile vedere il contenuto di 


uno qualsiasi dei cinque schermi ma occorre ricordare che solo quando si fa una commu- 
tazione che implica il primo schermo la visualizzazione verrà modificata. 


L’altro comando disponibile è |[SCREENCOPY. Ciò permette di copiare uno schermo 
su un altro riscrivendo quest’ultimo con la nuova immagine. 


Si scriva: 
MODE 1 


PRINT “QUESTO E’ UNO SCHERMO DA COPIARE” 
|ISCREENCOPY,2,1 
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Il contenuto dello Schermo 1 viene copiato nello Schermo 2. Se si scambiano i parametri 
scrivendo: 


MODE 1 
|ISCREENCOPY,1,2 


...Jl contenuto dello schermo attualmente visualizzato viene sovrascritto dallo schermo 
Di 


Quindi il primo parametro è lo schermo su cui copiare; il secondo parametro è lo schermo 
da cui copiare. 


In fase di copia degli schermi, si noti che si produrrà uno sfalsamento di visualizzazione 
se le modalità (MODE) degli schermi sono diverse, o se lo schermo si è spostato in sù di 
qualche riga dopo l’ultimo comando MODE. I comandi per lo schermo di BANK 
MANAGER sono stati progettati per essere usati con schermi grafici piuttosto che testi, 
è meglio quindi che che non accadano spostamenti di righe. 


Uso di BANK MANAGER per la gestione delle stringhe 


Vi sono altri quattro comandi di BANK MANAGER che permettono l’uso dei 64K di 
memoria addizionale come archivio di variabili stringa. 


Molti programmi possono essere divisi in due parti: nella prima risiedono le istruzioni del 
programma, nella seconda i dati che il programma usa. Un ottimo esempio è un 
programma di archivio come ad esempio una agenda degli indirizzi. Un tale programma 
dovrebbe usare un vettore di stringhe per memorizzare i nomi e gli indirizzi delle persone 
presenti nel libro. 


Le stringhe possono essere memorizzate nel secondo lotto di 64K di memoria in modo 
sequenziale fino alla fine. La memoria nella quale tali stringhe sono memorizzate può 
essere divisa in scomparti che prendono il nome di record. Il record può essere di una 
qualsiasi lunghezza fissata compresa tra 2 e 255 caratteri, dove la lunghezza di una stringa 
in BASIC varia a seconda del suo contenuto. Lo scopo del record è quello di fornire una 
dimensione standard agli scomparti nel quale memorizzare le stringhe di informazione. 
Ogni operazione di registrazione e ritrovamento dei dati da un record è seguita automa- 
ticamente da un passo nel record successivo, in attesa dell’operazione successiva. Il 
record da usare per l’operazione successiva è detto “record attuale” e verrà usato 
automaticamente a meno che non venga specificato uno differente. 


Questo sistema di gestione di memoria viene chiamato da noi “disco RAM”. Questo 
perchè si opera in modo analogo ai dischi ma usando la RAM. 


Si leggano le descrizioni che seguono sui vari comandi per comprendere ciò che essi 
fanno e si guardino poi i diversi esempi. 


Il primo comando del disco RAM è |BANKOPEN. Questo comando specifica quanti 
caratteri deve contenere ogni record. La sintassi è la seguente: 
|BANKOPEN,n 


dove il numero n specifica il numero di caratteri del record. Il numero n può assumere 
valori compresi tra 0 e 255, ma i valori 0 e 1 avranno strani effetti. 
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|BANKWRITE memorizza una stringa nel record attuale. Il record attuale viene quindi 
incrementato in modo che punti su quello successivo a quello appena scritto in attesa 
dell’operazione successiva. La sintassi è la seguente: 


|BANKWRITE,@r%,a$ 


o 
|BANKWRITE,@r%,a$,n: 


... dove r% è una variabile intera che restituisce un codice che fornisce informazioni 
riguardo l’operazione. a$ è una variabile stringa che contiene i caratteri che devono 
essere scritti nel record. Nel primo dei due esempi, il record è quello attuale; nel secondo, 
il parametro opzionale n specifica il record su cui scrivere. 


|BANKREAD esamina il record attuale e restituisce il suo contenuto in una stringa: Il 
record attuale Viene quindi incrementato in modo che punti su quello successivo a quello 
appena letto in attesa dell’operazione successiva. La lettura di un record non comporta 
la sua cancellazione; tale operazione può essere quindi ripetuta innumerevoli volte. La 
sintassi è la seguente: 


|BANKREAD,@r%,a$ 


o 
|]BANKREAD,@r%,a$,n 


... dove r% è una variabile intera che restituisce un codice che fornisce informazioni 
riguardo l’operazione. a$ è una variabile stringa che contiene i caratteri letti. Nel primo 
dei due esempi, il record è quello attuale; nel secondo, il parametro opzionale n specifica 
il record da leggere. 


L’ultimo comando è |BANKFIND. Questo comando ricerca una particolare stringa tra i 
record. Se la stringa viene trovata restituisce il numero di record in cui è stata trovata. La 
sintassi è la seguente: 

]BANKFIND,@r%,a$ 

O) 

|]BANKFIND,@r%,a$,n 


(0) 


IBANKFIND,@r%,a$,n,m 
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... dover% è una variabile intera che restituisce o il numero del record (dove è stata trovate 
la stringa) o un codice che indica che la stringa non è stata trovata. a$ è la stringa da 
cercare. Il parametro opzionale n indica il record da cui iniziare la ricerca: se non viene 
specificato la ricerca ha inizio dal record attuale. Il secondo parametro opzionale m 
specifica l’ultimo record da confrontare; la ricerca termina con tale record anche se 
infruttuosa. Se tale parametro viene omesso la ricerca continua fino alla fine di tutti i 64K 
continuando anche se i dati sono terminati. 


Se si è già caricato il programma BANK MANAGER per vedere i comandi di schermo 
e non si è riavviato il computer allora i comandi sono già residenti in memoria. Se non 
lo si è fatto occorre inserire il lato 1 (Size 1) del disco di sistema e scrivere: 


RUN “BANKMAN” 
Si scriva ora: 
|BANKOPEN,20 


Questa istruzione fissa la lunghezza del record a 20 caratteri e il record attuale a 0. 


Si scriva ora: 
a$="PRIMA VOCE”+SPACE$(10) 


...che pone a$ ad esattamente 20 caratteri. 


Si scriva ora: 
r%=0 


... per inizializzare 1% 


Si scriva ora: 


|]BANKWRITE,@r%,a$ 


Questa istruzione scrive a$ nel primo record (record 0). Si scriva ora: 


d$=SPACE$(20) 
]BANKREAD,@r%,d$,0 
PRINT d$ 


Il primo comando fa in modo che d$ contenga 20 spazi. Questo è uno spazio sufficiente 
a contenere i record da leggere. Il secondo comando legge il record numero 0 e pone il 
risultato in d$. Poichè il record attuale è il numero 1 (a causa della precedente operazione 
IBANKWRITE) è ora necessario specificare il record 0, quello che deve essere letto. 
Occorre ricordare che se non si specifica quale record leggere viene letto quello attuale. 
AI termine dell’operazione di lettura viene stampato il risultato. Quindi d$ dovrebbe 
contenere “PRIMA VOCE” e 10 spazi. 
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Si scriva ora: 


b$="DUE"+SPACE$(17) 
c$="TRE"+SPACE$(17) 
IBANKWRITE,@r%,b$,1 
IBANKWRITE,@r%,c$ 


Ciò pone b$ e c$ nei record 1 e 2. Anche in questo caso viene specificato, nel primo 
comando |BANKWRITE, il parametro opzionale chN specifica il record 1 come record 
nel quale porre b$. Il record attuale viene di conseguenza fissato automaticamente a 2; 
non è quindi necessario specificarlo. 


Si scriva: 
PRINT r% 


Il risultato di questa istruzione dovrebbe essere 2. Questo numero può essere considerato 
come l’ultimo record su cui si è operato o come l’attuale record meno uno. Nell’esempio 
precedente l’ultimo record su cui si era operato era 2 e quello successivo 3. 


Lo scopo di questo codice è quello di fornire informazioni sull’operazione effettuata. Una 
operazione conclusa con successo restituirà come codice un numero positivo che indica 
un record; un insuccesso restituirà un numero negativo. Vi sono due possibili errori che 
possono essere restituiti con |,BANKWRITE e |BANKRE? D. Essi sono: 


-1 Indica che si è raggiunta la fine del file. Ciò accade quando si sono usati tutti i record 
o si è specificato un record inesistente. 


-3 Indica un insuccesso nella commutazione di memoria. Ciò non dovrebbe mai 
accadere. 


Si provino questi ulteriori esempi: 


d$=STRING$(20,"X") 
]BANKOPEN,20 
FOR n=1 to 3:|]BANKWRITE,@r%,d$:NEXT 


d$ contiene ora 20 X; |BANKOPEN pone il record attuale a 0, quindi il comando 
IBANKWRITE sovrascriverà il contenuto dei record 0, 1 e 2 con d$. 


Si scriva ora: 


a$="PRIMO” 
|BANKWRITE,@r%,a$,0 
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Ciò pone la parola “PRIMO” nel record 0 sovrascrivendo su alcune X. Ora si riempia 
ancora di 0 d$ mediante: 


d$=SPACE$(20) 

Si scriva ora: 

|BANKREAD,@r%,d$,0 

Questa istruzione riporta il record 0 in d$. 


Riassumiamo i passi fatti fino ad ora. 


Tutti e tre i record contengono X. Nel record 0 è stata aggiunta la parola “PRIMO”. d$ 
è stato riempito di spazi ed infine il record 0 è stato portato in d$. Si scriva ora: 


PRINT d$ 


Il risultato dovrebbe essere: “PRIMOXXXXKKKKKAKAKKKKXX", Ciò illustra un’impor- 
tante considerazione riguardo l’uso di questi comandi. Se la stringa posta nel record non 
lo riempie completamente i vecchi caratteri che non sono stati sovrascritti resteranno nel 
record. E’ quindi utile porre nel record una stringa di spazi o di CHR$(32) prima di 
immettervi nuove informazioni. Questo per evitare di porre una stringa e trovare caratteri 
indesiderati. La stessa considerazione va fatta per stringhe nelle quali un record sarà letto. 
Se la stringa è maggiore della lunghezza del record alla fine della stringa vi saranno dei 
caratteri non modificati. Questo è il motivo per cui d$ è stato cancellato (riempito con 
spazi) prima di porvi il record 0. 


E’ possibile scrivere una stringa in un record troppo piccolo per accettare la stringa 
completa. Se ciò accade i caratteri eccedenti verranno ignorati. 


E’ possibile inoltre porre il contenuto di un record lungo in una stringa corta. Anche in 
questo caso i caratteri eccedenti (letti dal record) verranno ignorati. Nelle normali 
operazioni sulle stringhe, BASIC dovrebbe estendere automaticamente la stringa in 
modo che accetti i caratteri eccedenti ma ciò non accade con un comando esterno. 


Vi è infine il comando |BANKFIND. Questo permette di cercare una particolare voce nei 
record. Se ad esempio il record numero 24 inizia con la parola “FED”, è possibile 


ricercarla con il comando: 


|BANKFIND,@r%,”FED” 


Ciò è molto utile nei programmi archivio quando si deve ricercare un nome o un indirizzo. 
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|BANKFIND inizierà la ricerca dal record attuale e continuerà tale ricerca su tutti i record 
fino a quando non trovala stringa cercata o non raggiunge la fine del secondo lotto di 64K. 


E° possibile specificare il numero di record dal quale iniziare la ricerca, aggiungendo tale 
numero alla fine del comando. 


E’ possibile includere, dopo l’inizio del numero di record, un ulteriore numero di record 
per specificare il record nel quale terminare la ricerca. 


E’ possibile includere |,BANKFIND per cercare una stringa che non si trova all’inizio del 
record. A tal fine, i CHR$(0) vanno usati nella posizione del carattere precedente i 


caratteri significativi da ricercare. I CHR$(0) verranno trattati come “caratteri jolly” 
(come ? nei nomi di file di CP/M) che significa che vengono considerati come “qualsiasi 
carattere”. Un esempio potrebbe essere: 


a$=STRING$(10,0)+"FRED” 
|]BANKFIND,@r%,a$,0 


Questo dovrebbe trovare la prima occorrenza della parola “FRED” (dovrebbe trovarsi tra 
l’undicesimo ed il quattordicesimo carattere). I primi dieci caratteri dovrebbero contene- 
re un numero di telefono o una qualsiasi altra informazione che |[BANKFIND dovrebbe 


ignorare. 
Il numero di record corrispondente alla stringa trovata viene posto nella variabile intera 


r% usata come codice di ritorno (se la parola “FRED” è stata trovata), altrimenti il codice 
di ritorno conterrà -2. 


Ulteriori dettagli... 


Ulteriori informazioni riguardo BANK MANAGER si troveranno nel Capitolo 8 ed 
occorre studiare le parti 13 e 14 del Capitolo 7 riguardanti l’uso di RSX. 


Si controlli infine di aver osservato gli avvertimenti forniti all’inizio del manuale nel 
paragrafo “IMPORTANTE”: 


NOTE OPERATIVE 1,2,3,9 
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Ciò conclude la parte 11 del Corso Introduttivo sul CPC6128. Da ora in poi si dovrebbe 
conoscere ciò che la maggior parte dei tasti della tastiera fa e come usare alcuni dei più 
semplici comandi BASIC, come formattare un disco vergine in modo che sia pronto per 
l’uso e come eseguire alcune delle più elementari funzioni sui dischi cioè LOAD, SAVE, 
CAT ecc oltre ad alcuni comandi AMSDOS, CP/M e BANK MANAGER. 


I capitoli seguenti affrontano degli aspetti più specializzati di calcolo e del BASIC 
AMSTRAD. Vi è una guida finale nella parte dei dischi con parti su AMSDOS e CP/M 
ed occorrerà ricominciare tutto da capo con un nuovo linguaggio Dr.LOGO della Digital 
Research. 


Buona fortuna e buona lettura! 
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Capitolo 2 
Dopo i Fondamenti... 


Si è ora terminato di leggere il corso Introduttivo e si ha di fronte il 
computer acceso. Si è appena appreso come eseguire una operazione 
diverse volte usando il ciclo FOR NEXT, e come usare IF THEN per 
controllare se una condizione è vera. 


Bene, si è scritto il nome dell’utente su tutto lo schermo; si vuole ora effettuare alcune 
operazioni: alcune utili, altre dilettevoli. Il capitolo che segue elenca le parole chiave di 
BASIC AMSTRAD a disposizione dell’utente, e specifica inoltre la descrizione della 
‘sintassi’ ed il loro uso. Dopo ciò, quello che si può fare con il computer è limitato solo 
dalla propria immaginazione. 


Se non si è mai usato un computer l’idea di ‘programmazione’ potrebbe intimorire. Non 
si abbia paura! E’ più semplice di quanto non si creda e certamente è più semplice della 
conoscenza delle tecnologie e del ‘gergo’. Non abbiate paura del BASIC; ben presto si 
troverà divertente la programmazione con questo linguaggio e si vedranno i frutti della 
propria fatica. La programmazione può essere un esercizio utile soprattutto quando si è 
principianti del computer e del linguaggio. Si ricordi che qualsiasi cosa si faccia occorre 
fare attenzione a non scrivere sui dischi originali di sistema CP/M: in questo caso nulla 
di quello che si scrive può danneggiare il computer ed è sempre utile provare qualche cosa 
di nuovo. 


Da dove iniziare? 


L’inizio è sempre la fase più difficile di un programma. Comunque, quello che occorre 
evitare è di buttarsi a capofitto e scrivere senza precedentemente pensare. 


Una delle prime cose da stabilire è quello che il programma deve fare esattamente e come 
debbano essere presentati i risultati (in altre parole, come deve presentarsi lo schermo in 
fase di esecuzione). 


Dopo aver deciso ciò si può iniziare a scrivere il programma che soddisfi le proprie 
richieste, e al contempo pensare a come rendere il programma fluido dall’inizio alla fine, 
con i minimi salti (GOTO). Un buon programma sarà di facile lettura e non comporterà 
confusione in fase di ricerca di errori. 
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Fortunatamente BASIC è un linguaggio indulgente ed aiuterà spesso l’utente visualiz- 
zando messaggi di errori quando quest’ultimo sbaglia. BASIC permette inoltre di avere 
‘ripensamenti’ ed è possibile inserire una nuova linea tra quelle esistenti senza problemi. 


Scriviamo un semplice programma. 


Iniziamo dunque. Scriveremo un programma che tiene traccia dei numeri di telefono e 
degli indirizzi di amici. Applichiamo ora le regole precedenti: ‘Cosa deve fare il 
programma?’ e ‘Come deve essere presentato il risultato?”. 


Bene, il programma dovrebbe permettere di inserire e memorizzare ad esempio 100 nomi 
e numeri di telefono. Si deve poter poi inserire un nome ed ottenere il numero di telefono. 
In oltre, se non ci si ricorda del nome si dovrebbe essere in grado di visualizzare la lista 
completa. Si noti che in tal modo si è automaticamente considerato la domanda inerente 
la presentazione del risultato. 


Bene, si mettano le dita sulla tastiera! Inizieremo ad inserire il titolo: 


10 REM agenda telefonica 


Non occorre porre un titolo nel programma, ma quando si inizia ad avere molti programmi 
è utile per sapere cosa fa. 


Successivamente, sappiamo che vogliamo inserire una stringa di caratteri in una varia- 
bile; chiameremo tale variabile NOME$. La stessa considerazione vale per il numero di 
telefono; chiameremo tale variabile TEL$. 


Ci si ricorda degli esempi del corso Fondamenti? Essi usavano il comando INPUT per 
inserire un valore della variabile, quindi possiamo scrivere: 


20 INPUT”inserire il nome”;NOME$ 
30 INPUT”inserire il numero di telefono”;TEL$ 
run 


E° possibile inserire il nome, ad esempio: Silvio e il numero di telefono, ad esempio 02 
230222. 


Il programma ha memorizzato l’informazione ma non ha prodotto nessun risultato sullo 
schermo. E° necessario del resto avere una parte di programma che permetta di recuperare 


l’informazione e visualizzarla. Per ottenere i valori di NOME$ e TEL$ dovremmo usare 
i comandi come: 


PRINT NOME$ ...e... PRINT TEL$ 
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Abbiamo detto che vogliamo essere in grado di memorizzare cento nomi e cento numeri 
di telefono. Sicuramente non dobbiamo scrivere un programma con duecento istruzioni 
INPUT, ognuna con una variabile diversa e quindi duecento istruzioni PRINT per 
produrre una lista sullo schermo? No, niente paura, il computer mette a disposizione 
quello che è noto come vettore proprio a tale scopo. Un vettore permette di usare una 
variabile (come NOME$) che può avere una qualsiasi dimensione (nel programma di 
esempio 100). Quindi, quando si vuole conoscere il contenuto di una variabile si usa il 
nome della variabile seguito dal suo numero di riferimento (racchiuso tra parentesi). 
Questo numero di riferimento è chiamato indice e l’espressione NOME$(27) è detta 
‘variabile indice’. Se si usa una variabile numerica come indice, per esempio NOME$(x) 
è possibile scandire tutta la lista di variabili, da 1 a 100, modificando il valore della x in 
un ciclo FOR NEXT; cioè FOR x=1 TO 100. Ogni volta che il valore della x aumenta 
di 1, il valore dell’indice cambia e fa riferimento ad un ‘elemento’ diverso o a un nome 
del vettore NOME$. 


Vogliamo che i due vettori; uno NOME$ e l’altro TEL$ siano composti da 100 elementi. 
Prima di poter iniziare ad usare il vettore occorre dichiarare la DIMensione dei vettori. 
Riscriveremo le linee 20 e 30 con le seguenti: 


20 DIM NOME$(100) 
30 DIM TEL$(100) 


Scriviamo ora una parte di programma che permetta di inserire e successivamente 
ritrovare i nomi ed i numeri. Si scriva: 


40 FOR x=1 TO 100 

50 INPUT;” nome”;NOME$(x) 
60 INPUT;” telefono”;TEL$(x) 
70 NEXT 

run 


Ciò va bene ma non si vogliono inserire tutti i 100 nomi in una sola volta. Inoltre, la 
presentazione stessa del programma sullo schermo è poco soddisfacente. Quello che 
occorre ora è un po’ di ordine. Prima di inserire i dati è bene pulire lo schermo da tutto 
il testo superfluo. Si aggiunga: 


45 CLS 


Ora come indicare al computer che per il momento non si vogliono più inserire 


informazioni? Premendo [ESC] si ferma il programma ma quando lo si riesegue (tramite 
run) si sono persi tutti i valori inseriti nelle variabili! 
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Ecco cosa si può invece fare. Quando il programma prende un nuovo nome facciamo in 
modo che controlli che sia stato scritto qualcosa per il valore di NOME$(x), in altre parole 
controlla se il valore di NOME$(x) sia o meno la ‘stringa vuota’. Se la stringa è vuota 
allora il programma smette di prendere valori. Si aggiunga: 


55 IF NOME$(x)="" THEN 80 
80 PRINT “fine inserimento” 


Inoltre, per far sì che il programma indichi di terminare l’inserimento si aggiunga: 
47 PRINT “Premere [RETURN] per terminare l'inserimento” 


Si scriva ora la parte di programma che stampa l’informazione memorizzata sotto forma 
inizialmente di una lista. Si aggiunga: 


90 FOR x=1 TO 100 
100 PRINT NOME$(x);” “TEL$(x) 
110 NEXT 


Ancora una volta il programma non si ferma fino a quando non ha raggiunto il centesimo 
elemento. Si aggiunga: 


95 IF NOME$(x)="" THEN 120 
120 PRINT “lista terminata” 


La linea 95 scopre se NOME$(x) è una stringa vuota nel qual caso viene terminata la 
stampa e le linee 100 e 110 non vengono eseguite. 


Scriviamo ora un programma che ricerchi un nome inserito. Si aggiunga: 


130 INPUT “cerca”;CERCA$ 

140 FOR x=1 TO 100 

150 IF INSTR(NOME$(x),CERCA$)=0 THEN 180 
160 PRINT NOME$(x);” “TEL$(x) 

170 END 

180 NEXT 

190 PRINT “nome non trovato” 

run 
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Vi è un nuovo comando nella linea 150: INSTR. Questo indica al computer di 
INterrogare la prima espressione STRinga per cercare la prima occorrenza della seconda 
espressione stringa; in altre parole, cerca in NOME$(x) CERCA$ (che è la variabile 
inserita dall’utente nella linea 130 e che contiene il nome da cercare). Se INSTR non la 
trova restituisce il valore 0 che in questo caso viene usato per far saltare il programma 
nella linea 180 e cercare ancora nel valore successivo di x. Se il programma ha cercato 
tutti i 100 valori della x continua nella linea 190 ed indica che il nome non è stato trovato. 
Se comunque INSTR trova il nome non produce il valore 0 e salta alle linee 150 e 160 
che visualizzano il nome ed il numero di telefono; il programma termina alla linea 170. 


Come si è potuto vedere il programma si è evoluto in modo veloce, anche se comunque 
c'è ancora molto da fare. Riflettiamo un momento e consideriamo alcuni aspetti del 
programma iniziando dal modo in cui si esegue il programma: prima si scrive l’informa- 
zione, poi si ottiene la lista e quindi si cerca un nome specifico. 


E se...? 


E se non si vuole seguire quest'ordine? Si vuole ricercare un nome inserito ieri? Si 
vogliono aggiungere dei nomi e dei numeri di telefono a quelli già esistenti? Questi sono 
tutti gli aspetti del programma a cui pensare e trovare una soluzione; questo fa parte della 
programmazione. Come precedentemente menzionato, BASIC permette di aggiungere 
nuove istruzioni nel programma, ma un bravo programmatore deve aver previsto questi 
problemi. 


Un altro dei maggiori problemi consiste nel fatto che tutti i valori delle variabili sono 
memorizzati in un’area di memoria che viene cancellata ogni qual volta si esegue un 
programma. Non si vorranno inserire tutte le informazioni ogni volta che si esegue il 
programma, quindi si vorranno salvare i valori contenuti nelle variabili NOME$ e TEL$ 
prima del termine del programma e li si vorranno caricare ogni volta che si esegue il 
programma. 


Soluzioni 


Il primo di questi problemi (l’ordine cioè con cui si'eseguono le operazioni) può essere 
risolto scrivendo il programma in modo che permetta di scegliere al momento dell’ese- 
cuzione l’operazione che si desidera effettuare. Questo tipo di programma è detto 
‘guidato da menù” ed in effetti visualizza sullo schermo un menù dal quale selezionare 
una opzione. Se si è usato uno sportello automatico di una banca allora si è usato un 
programma guidato da menù! Aggiungiamo al programma tale menù: 
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32 PRINT “1. inserimento” 

33 PRINT “2. elenco informazioni” 

34 PRINT “3. ricerca” 

35 PRINT “4. salvataggio informazioni” 
36 PRINT “5. caricamento informazioni” 
37 INPUT “inserire la scelta”;ms 

38 ON ms GOSUB 40,90,130 


85 RETURN 

125 RETURN 
170 RETURN 
200 RETURN 


Come si è potuto vedere si è costruito il programma che stampa le opzioni del menù, 
chiede l’inserimento della scelta e pone quest’ultima nella variabile ms. Il comando ON 
ms GOSUB nella linea 38 indica al programma che se ms=1 questo deve saltare nella 
prima linea (40) della SUB-routine; se ms=2 allora deve andare nella seconda linea 
della SUB-routine (90) e così via. 


Ognuna di queste funzioni richiamate dal comando ON ms GOSUB sono ora delle 
nuove routine e devono avere quindi alla fine il comando RETURN: è per questo motivo 
che li abbiamo aggiunti. 


Ci si ricorda ciò che fa il comando RETURN ? Fa in modo che BASIC ritorni nel punto 
del programma seguente il comando GOSUB: in questo caso fa in modo che ritorni nella 
linea 38 (ciò significa che il programma continuerà alla linea 40: il punto di inserimento 
delle informazioni!). Non si vuole che ciò accada quindi si inserisce: 


39 GOTO 32 


...per far sì che il programma visualizzi ancora il menù. Si esegua (run) il programma: si 
potrà vedere che abbiamo fatto progressi. 


Si guardi ora il listato del programma (se il programma è ancora in esecuzione si prema 
[ESC] due volte). Si scriva: 


LIST 


Dovrebbe apparire: 


10 REM agenda telefonica 

20 DIM NOME$(100) 

30 DIM TEL$(100) 

32 PRINT “1. inserimento” 

33 PRINT “2. elenco informazioni” 

34 PRINT “3. ricerca” 

35 PRINT “4. salvataggio informazioni” 
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36 PRINT “5. caricamento informazioni” 
37 INPUT “inserire la scelta”;,ms 

38 ON ms GOSUB 40,90,130 

39 GOTO 32 

40 FOR x=1 TO 100 

45 CLS 

47 PRINT “Premere [RETURN] per terminare l'inserimento” 
50 INPUT;” nome”;NOME$(x) 

55 IF NOME$(x)="" THEN 80 

60 INPUT;” telefono”;TEL$(x) 

70 NEXT 

80 PRINT “fine inserimento” 

85 RETURN 

90 FOR x=1 TO 100 

95 IF NOME$(x)=”" THEN 120 

100 PRINT NOME$(x);” “;TEL$(x) 

110 NEXT 

120 PRINT “lista terminata” 

125 RETURN 

130 INPUT “cerca”;CERCA$ 

140 FOR x=1 TO 100 

150 IF INSTR(NOME$(x),CERCA$)=0 THEN 180 
160 PRINT NOME$(x);” “;TEL$(x) 

170 RETURN 

180 NEXT 

190 PRINT “nome non trovato” 

200 RETURN. 


Si potrà notare che alcune linee hanno esaurito lo spazio per l'inserimento di altre linee, 
quindi per creare tale spazio e per mettere più ordine nel programma rinumeriamo le linee. 
Si scriva: 


RENUM 
LIST 


Si deve ora vedere: 


10 REM agenda telefonica 

20 DIM NOME$(100) 

30 DIM TEL$(100) 

40 PRINT “1. inserimento” 

50 PRINT “2. elenco informazioni” 

60 PRINT “3. ricerca” 

70 PRINT “4. salvataggio informazioni” 
80 PRINT “5. caricamento informazioni” 
90 INPUT “inserire la scelta”;,ms 
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100 ON ms GOSUB 120,210,270 
110 GOTO 40 

120 FOR x=1 TO 100 

130 CLS 

140 PRINT “Premere [RETURN] per terminare l’inserimento” 
150 INPUT;” nome”;NOME$(x) 
160 IF NOME$(x)="" THEN 190 
170 INPUT;” telefono”;TEL$(x) 
180 NEXT 

190 PRINT “fine inserimento” 

200 RETURN 

210 FOR x=1 TO 100 

220 IF NOME$(x)=”" THEN 250 
230 PRINT NOME$(x);” “;TEL$(x) 
240 NEXT 

250 PRINT “lista terminata” 

260 RETURN 

270 INPUT “cerca”,CERCA$ 

280 FOR x=1 TO 100 

290 IF INSTR(NOME$(x),CERCA$)=0 THEN 320 
300 PRINT NOME$(x);” “;TEL$(x) 
310 RETURN 

320 NEXT 

330 PRINT “nome non trovato” 
340 RETURN 


Così va meglio. Ed ora proseguiamo! Aggiungiamo ora una istruzione in modo che 
quando si inseriscono nuovi nomi e numeri di telefono il computer li aggiunga alle altre 
voci ponendole nel primo elemento del vettore che trova vuoto. Questa volta useremo un 
nuovo comando, ovvero LEN, che indica la lunghezza della stringa. 


Si specificherà che se la lunghezza di NOME$(x) è maggiore di zero allora in quell’e- 
lemento è già presente una voce e quindi si farà saltare il programma alla linea 180 (che 
è un comando NEXT). 


Coloro che hanno delle minime nozioni della lingua inglese troveranno molto facile 
comprendere le istruzioni di BASIC. 


135 IF LEN(NOME$(X))>0 THEN 180 


E’ una soluzione semplice, vero? I problemi di questo tipo possono essere facilmente 
risolti utilizzano le parole chiave di BASIC ed un po” di intuito. C'è sempre un comando 
che può soddisfare le necessità dell’utente e più si programma più si troverà velocemente 
la soluzione. 
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Vediamo ora come salvare i contenuti delle variabili in modo che possano essere caricati 
quando si esegue il programma. Nella parte 7 del corso Introduttivo si è visto come 
salvare il programma stesso usando il comando SAVE. Comunque il programma stesso 
è solo una struttura che permette alle variabili di essere inserite (alla tastiera) e rilasciate 
(allo schermo). Quando si salva un programma si salva solo una struttura, non i valori 
delle variabili. 


Ora dobbiamo scrivere una parte di programma che salva i valori delle variabili su disco. 
Facciamo ciò creando un ‘file di dati’ separato. 


Prima di tutto apriamo il file e ne specifichiamo il nome “dati”. Poi scriviamo i valori delle 
variabili NOME$ e TEL$ da 1 a 100 sul file ed infine chiudiamo il file e torniamo nel 
menù. Aggiungiamo tali istruzioni a partire dalla linea 350. Per non scrivere conti- 
nuamente le linee del programma si usi il comando: 


AUTO 350 


... Che fà si che le linee vengano incrementate automaticamente: 


350 OPENOUT “dati” 
360 FOR x=1 TO 100 

370 WRITE #9,NOME$(x),TEL$(x) 
380 NEXT 

390 CLOSEOUT 

400 PRINT “dati salvati” 

410 RETURN 


Dopo aver inserito la linea 410 e premuto il tasto [RETURN] si prema [ESC] per 
terminare la numerazione automatica delle linee. 


Ora occorre inserire un ulteriore numero nella lista ON ms GOSUB della linea 100: 
questo perchè si è aggiunta un’altra opzione al menù da selezionare. Si editi quindi la linea 
100 per aggiungere tale numero (EDIT 100): 


100 ON ms GOSUB 120,210,270,350 


Ora se si seleziona il numero 4 del menù il programma salverà tutte le informazioni 
inserite su disco. 


Si noti nella linea 370, dove il programma indica di scrivere i valori di NOME$(x) e 
TEL$(x) su disco, l’espressione #9, usato dopo la parola WRITE. Il segno # è il segno 
di ‘indicatore di canale’; in altre parole indica al computer a quale ‘canale’ inviare i dati. 
Il computer ha 10 canali. 


Inviando i dati al canale da 0 a 7 (#0 a #7) questi appariranno sullo schermo poichè i canali 
#0 fino a #7 sono ‘indicatori schermo’ o finestre (WINDOW). 
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Inviando i dati al canale #8 si inviano i dati alla stampante (se connessa). 


Infine, inviando i dati al canale #9 si inviano al drive, e ciò è quello che si è fatto nella 
linea 370. 


Facendo un passo indietro... 


Spendiamo ora poche parole riguardo il comando AUTO appena visto. Se si scrive: 
AUTO 


...Il computer inizierà a numerare le linee cominciando dal numero 10 ed avanzando di 
10 in 10 ad ogni pressione del tasto [RETURN]. Se si sono usate precedemente le linee 
10, 20, 30 ecc. il contenuto di ognuna di queste verrà visualizzato sullo schermo ad ogni 
pressione del tasto [RETURN]. Quando ogni linea appare sullo schermo questa può 
essere editata prima di premere [RETURN] fornendo così un metodo veloce di continuità 
di edizione sulle linee di programma successive. 


Tornando al programma... 


Si sono aggiunte le istruzioni per salvare le informazioni sul disco; l’ultima cosa che resta 
da fare è quella di caricare i dati ogni volta si esegue il programma. Occorre del resto 
aggiungere un’altra opzione di menù alla lista di numeri nella linea 100. Si editi 
nuovamente la linea 100 come segue: 


100 ON ms GOSUB 120,210,270,350,420 


Ora per caricare i dati occorre inserire delle nuove informazioni. Si inizia aprendo il file 
“dati” di ingresso (INPUT) del disco. Si prendono poi i dati dal disco (canale #9) di tutti 
i valori delle variabili NOME$(x) e TEL$(x) da 1 a 100 ed infine si chiude il file e si torna 
nel menù. Si scriva: 


420 OPENIN “dati” 

430 FOR x=1 TO 100 

440 INPUT #9,NOME$(x),TEL$(x) 
450 NEXT 

460 CLOSEIN 

470 PRINT “dati caricati” 

480 RETURN 
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La fine dell’inizio... 


Ora che si è scritto un programma che soddisfa le richieste iniziali tutto ciò che resta da 
fare è curare la visualizzazione sullo schermo. 


L’inizio della fine... 


Si aggiungano alcune istruzioni che rendono più ordinata la presentazione del pro- 
gramma: 


34 MODE 1 


Ciò stabilisce la modalità dello schermo e cancella lo schermo all’inizio del programma. 
Si aggiunga ora: 


36 WINDOW #1,13,30,10,14 


Non si creda che sia una istruzione molto complicata. Con tale istruzione si è creato sullo 
schermo una piccola finestra nella quale visualizzare il menù. Dopo la parola WINDOW 
si è specificato il numero di canale che la finestra deve usare; si ricorda che è possibile 
usare i canali da #0 a #7. Si deve a questo punto tenere in mente che tutto ciò che viene 
stampato sullo schermo usa il canale #0 a meno che non venga specificato altrimenti; non 
si vuole usare #0 per la piccola finestra in caso contrario tutto quello che il programma 
stampa viene inviato lì. Si specifica invece un altro canale, in questo caso si è usato #1. 
I quattro numeri che seguono #1 indicano la dimensione della finestra: i numeri 
specificano gli angoli sinistro, destro, in alto e in basso della finestra e fanno riferimento 
ai numeri di colonna e riga di testo (come il comando LOCATE). Quindi, nel precedente 
esempio il canale è #1, l’angolo sinistro della finestra inizia nella colonna 13, quello 
destro termina nella colonna 30, quello in alto inizia nella riga 10 e quello in basso 
termina nella riga 14. 


Ora per far stampare nel canale #1 ciò che si è editato nelle linee dalla 40 alla 80 si 
modifichino tali linee come segue: 


40 PRINT #1,”1. inserimento” 

50 PRINT #1,"”2. elenco informazioni” 

60 PRINT #1,”3. ricerca” 

70 PRINT #1,”4. salvataggio informazioni” 
80 PRINT #1,”5. caricamento informazioni” 


Si aggiunga ora: 


85 LOCATE 7,25 
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Tale istruzione localizza il punto in cui l’istruzione INPUT della linea 90 apparirà in 
modo che risulti nitido. 


Quindi, per far sì che lo schermo sia sempre pulito quando si visualizza il menù, si editi 
la linea 110 e la si modifichi come segue: 


110 GOTO 34 


Per far sì che lo schermo venga pulito dopo la scelta di ogni opzione si aggiunga: 


95 CLS 


Si aggiungano infine le seguenti tre linee di programma che fanno fare una pausa al 
programma prima di tornare nel menù: 


103 LOCATE 9,25 
105 PRINT “si prema un tasto qualsiasi per tornare al menù” 
107 IF INKEY$=”" THEN 107 


La linea 103 indica al computer dove stampare il messaggio dato nella linea 105. La linea 
107 chiede alla tastiera di controllare quale stringa variabile è stata inserita (mediante la 
pressione del tasto). Se scopre che la stringa è vuota (perchè non è stato premuto alcun 
tasto) allora il programma riesegue la stessa istruzione fino a quando INKEY$ non la 
trova più vuota. Ciò è utile quando si vuole inserire una pausa nel programma, in tal modo 
BASIC non passa a processare la linea seguente ma attende la pressione di un tasto. 


E’ ora terminato il programma. Si possono a questo punto aggiungere istruzioni che 
cancellano i nomi e i numeri di telefono, che elenchino in ordine alfabetico, che stampino 
la lista, o se si è persone ambiziose che compongano automaticamente il numero dopo 
aver inserito il nome collegando naturalmente (SIP permettendo) il telefono al computer! 
Tutto ciò è possibile e si può continuare a controllare ed ampliare il programma, 
soprattutto quando si ha a disposizione un computer potente come il 6128. Abbandonia- 
mo ora questo programma sperando di aver appreso qualcosa in più sulla scrittura dei 
programmi. Si scriva ora, per rendere più chiaro il programma: 


RENUM 


...€ lo si salvi su disco o lo si getti via. Potrebbe, comunque, servire a registrare i numeri 
di telefono dei propri amici! 
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Infine si listi il programma: 


10 REM agenda telefonica 

20 DIM NOME$(100) 

30 DIM TEL$(100) 

40 MODE 1 

50 WINDOW #1,13,30,10,14 

60 PRINT #1,”1. inserimento” 

70 PRINT #1,”2. elenco informazioni” 

80 PRINT #1,”3. ricerca” 

90 PRINT #1,”4. salvataggio informazioni” 
100 PRINT #1,”5. caricamento informazioni” 
110 LOCATE 7,25 

120 INPUT “inserire la scelta”;ms 

130 CLS 

140 ON ms GOSUB 190,290,350,430,500 
150 LOCATE 9,25 

160 PRINT “si prema un tasto qualsiasi per tornare al menù” 
170 IF INKEY$="”" THEN 170 

180 GOTO 40 

190 FOR x=1 TO 100 

200 CLS 

210 IF LEN(NOME$(X))>O THEN 260 

220 PRINT “Premere [RETURN] per terminare l'inserimento” 
230 INPUT;” nome”;NOME$(x) 

240 IF NOME$(x)="" THEN 270 

250 INPUT;” telefono”;TEL$(x) 

260 NEXT 

270 PRINT “fine inserimento” 

280 RETURN 

290 FOR x=1 TO 100 

300 IF NOME$(x)="" THEN 330 

310 PRINT NOME$(x);” “TEL$(x) 

320 NEXT 

330 PRINT “lista terminata” 

340 RETURN 

350 INPUT “cerca”,CERCA$ 

360 FOR x=1 TO 100 

370 IF INSTR(NOME$(x),CERCA$)=0 THEN 400 
380 PRINT NOME$(x);” “TEL$(x) 

390 RETURN 

400 NEXT 

410 PRINT “nome non trovato” 

420 RETURN 

430 OPENOUT “dati” 
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440 FOR x=1 TO 100 

. 450 WRITE #9,NOME$(x),TEL$(x) 
460 NEXT 

470 CLOSEOUT 

480 PRINT “dati salvati” 

490 RETURN 

500 OPENIN “dati” 

510 FOR x=1 TO 100 

520 INPUT #9 ,NOME$(x),TEL$(x) 
530 NEXT 

540 CLOSEIN 

550 PRINT “dati caricati” 

560 RETURN 

run 
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Capitolo 3 
Elenco completo delle parole chiave 
BASIC del CPC6128 Amstrad 


IMPORTANTE 


E° fondamentale che si comprendano la terminologia e la nota- 
zione utilizzate in questo capitolo. Si incontreranno diversi tipi di 
parentesi, utilizzate durante la spiegazione di un comando che le 
contiene; ciascuna parentesi ha un significato specifico, come si 
potrà notare. 


Ogni parte di un comando non presentata tra parentesi deve essere fornita così come viene 
data. Il comando END, ad esempio, avrà la forma: 


END 

e la parola END dovrà essere digitata interamente. 

Quando un comando è incluso tra parentesi angolate <>, come ad esempio 
<numero linea> 


NON si devono digitare nè le parentesi, nè le parole in esse contenute: il precedente 
esempio mostra il tipo di dato richiesto nel comando. Ad esempio, 


EDIT <numero linea> 

significa che si dovrà digitare: 
EDIT 100 

Le parentesi tonde () DEVONO essere inserite letteralmente. Ad esempio, 
COS(<espressione numerica>) 


richiede l’inserimento delle parentesi intorno all’<espressione numerica> di cui è 
richiesto il COSeno, cioè: 


PRINT COS(45) 
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Infine, le parentesi quadre racchiudono elementi opzionali in un comando o in una 
funzione. Ad esempio, 


RUN [<numero linea>] 


significa che non è necessario fornire un parametro alla parola chiave RUN, ma che è 
possibile espandere il comando inserendo il parametro opzionale <numero linea>. 
Quindi, il comando può essere digitato come: 


RUN o RUN100 
Caratteri speciali 


&0& Prefisso per costanti esadecimali 
&X Prefisso per costanti binarie 
# Prefisso per i canali 


Tipi di dati 


Le stringhe possono essere lunghe da 0 da 255 caratteri. Una <espressione di stringa> è 
una espressione che produce un valore di tipo stringa. Le stringhe possono essere 
concatenate l’una all’altra mediante l’operatore +, a condizione che la stringa risultante 
non sia maggiore di 255 caratteri. 


I dati numerici possono essere interi o reali. Un dato intero è contenuto nell’intervallo - 
32768,.., 32767, mentre un dato reale è contenuto in una precisione leggermente 
superiore a nove cifre nell’intervallo +1.7E+38, con il minimo valore al di sopra dello 
zero approssimativamente di 2.9E-39. 


Una <espressione numerica> è una qualsiasi espressione il cui risultato sia un valore 
numerico. Possono essere semplici numeri, oppure una variabile numerica, oppure 
numeri utilizzati da variabili; si tratta di tutto ciò che non ricade sotto la categoria 
<espressione di stringa>. 


Un <canale> si riferisce ad una <espressione numerica> che identifica una finestra sullo 
schermo, una stampante o un disco, dove è necessario inviare il testo. 

Una <lista di:<elemento> descrive un parametro che comprende una lista di elementi 
separati da virgole. La lista può contenere un numero qualsiasi di elementi, limitati della 
lunghezza della linea. 


Gli indicatori di tipo sono: 


% — Intero 
| Reale (valore per difetto) 
$ Stringa 
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Si osservi che le parole chiave del BASIC del CPC6128 AMSTRAD vengono presentate 
nella seguente forma: 


PAROLA CHIAVE 
Sintassi 

Esempio 

Descrizione 


Parole chiave associate 


Le parole chiave possono essere: 


COMANDI. : operazioni che vengono eseguite direttamente. 
FUNZIONI  : operazioni che vengono attivate come argomenti in una espressione. 
OPERATORI : che agiscono su argomenti matematici. 


BASIC converte tutte le parole chiave inserite in caratteri minuscoli in MATUSCOLE nel 
LISTato di un programma. Gli esempi mostrati in questo capitolo utilizzano CARAT- 
TERI MAIUSCOLI, poichè il programma apparirà in questa forma quando verrà 
LISTato. Di conseguenza è preferibile inserirle in caratteri minuscoli, poichè risulterà 
semplice rilevare eventuali errori di battitura, in quanto le parole chiave verranno 
visualizzate in caratteri minuscoli in un LISTato. 


Per una guida completa al BASIC del CPC6128 AMSTRAD si consulti la specifica 
Concise BASIC SOFT967. 


Parole chiave... 


ABS 
ABS(<espressione numerica>) 


PRINT ABS(-67.98) 
67.98 


FUNZIONE: Restituisce il valore assoluto dell’espressione richiesta: perciò i numeri 
negativi vengono restituiti come positivi. 


Parole chiave associate: SGN 
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AFTER 


AFTER «ritardo di timer>[, <numero timer>] GOSUB <numero linea> 
10 AFTER 250 GOSUB 60:CLS 
20 PRINT “Indovina una lettera in 5 secondi” 
30 a$=INKEY$:IF flag=1 THEN END 
40 IF a$<>CHR$(INT(RND*26+97)) THEN 30 
50 PRINT a$;” e’ corretto. Hai vinto” 
55 SOUND 1,478:SOUND 1,358:END 
60 PRINT “Troppo tardi. Vinco io” 
70 SOUND 1,2000:flag=1:RETURN 
run 


COMANDO: Richiama una subroutine BASIC dopo un dato periodo di tempo. Il 
parametro <ritardo di timer> specifica il periodo di tempo in unità di 0,02 (cinquantesimi 
di) secondo. 

Il <numero timer> (compreso tra 0 e 3) specifica quale dei quattro timer deve essere usato. 
Il timer 3 ha priorità massima, mentre il timer 0 (quello per difetto) ha priorità minima. 
Ciascun timer può avere una subroutine associata. 

Ulteriori informazioni relative alle interruzioni si trovano nella parte 2 del capitolo “A 
vostra disposizione...”. 


Parole chiave associate: EVERY, REMAIN, RETURN. 
AND 


<argomento> AND <argomento> 


IF “alan’<"bob” AND “gatto">"cane” THEN PRINT “corretto” ELSE PRINT “sbagliato” 
corretto 

IF “bob”<"alan” AND “cane">”gatto” THEN PRINT “corretto” ELSE PRINT “sbagliato” 
sbagliato 

IF “alan”<"bob” AND “cane”>”gatto” THEN PRINT “corretto” ELSE PRINT “sbagliato” 
sbagliato 


PRINT 1 AND 1 
1 
PRINT 0 AND 0 


0 
PRINT 1 ANDO 
0 


OPERATORE: Esegue operazioni booleane bit a bit su interi. Il risultato è 0 a meno che 
entrambi gli argomenti siano 1. 

Ulteriori informazioni relative alla logica si trovano nella parte 2 del capitolo “A vostra 
disposizione...”. 

Parole chiave associate: OR, NOT, XOR. 
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ASC 


ASC(<espressione di stringa>) 


PRINT ASC("X”) 
120 


FUNZIONE: Restituisce il valore numerico del primo carattere in una <espressione di 
stringa>. 


Parole chiave associate: CHRÎ$. 


ATN 


ATN(<espressione numerica>) 


PRINT ATN(1) 
0.785398163 


FUNZIONE: Calcola 1’ ArcoTaNgente dell’<espressione numerica>. 


Si osservi che si possono utilizzare DEG e RAD per ottenere il risultato rispettivamente 
in gradi o in radianti. 


Parole chiave associate: COS, DEG, RAD, SIN, TAN. 
AUTO 


AUTOl[<numero linea>] [,<incremento>] 
AUTO 100,50 


COMANDO: Genera AUTOmaticamente i numeri di linea. Il parametro opzionale 
<numero linea> fornisce la prima linea che deve essere generata nel caso si desideri 
generare linee da un particolare punto di un programma. Se il parametro è omesso, i 
numeri di linea verranno generati dalla linea 10 in poi. 

L’<incremento> opzionale fornisce il numero di linee da lasciare prima di generare il 
successivo numero di linea. Se il parametro è omesso, i numeri di linea verranno 
incrementati ogni volta di 10. 

Se viene generato un numero di linea già in uso, il contenuto della linea verrà visualizzato 
sullo schermo e potrà essere eventualmente modificato. La linea visualizzata verrà 
sostituita nella memoria quando viene premuto il tasto [RETURN]. 


Per annullare la numerazione automatica di linee si prema [ESC]. 
Parole chiave associate: nessuna. 
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BIN$ 


BIN$(<espressione intera senza segno>[,<espressione intera>]) 


PRINT BIN$(64,8) 
01000000 


FUNZIONE: Produce una stringa di cifre BINarie che rappresentano il valore 
dell’<espressione intera senza segno>, utilizzando il numero di cifre binarie specificate 
dalla seconda <espressione intera> (da 0 a 16). Se il numero di cifre specificate è 
eccessivo, l’espressione risultante verrà completata con l’inserimento all’inizio di alcuni 
0; se il numero di cifre specificate non è sufficiente, l’espressione ottenuta NON verrà 
ridotta al numero specificato di cifre, ma sarà presentata con il necessario numero di cifre. 


L’<espressione intera senza segno> che deve essere convertita in forma binaria deve 
avere un valore compreso tra -32768 e 65535. 


Parole chiave associate: DEC$, HEX$, STR$. 
BORDER 


BORDER c<colore>[,<colore>] 


10 REM 729 combinazioni di cornice! 
20 SPEED INK 5,5 

30 FOR a=0 TO 26 

40 FOR b=0 TO 26 

50 BORDER a,b:CLS:LOCATE 14,13 
60 PRINT “cornice”;a;”,”;b 

70 FORt=1 TO 500 

80 NEXT t,b,a 

run 


COMANDO: Modifica il colore della cornice dello schermo. Se vengono specificati due 
colori, la cornice si alternata tra i due secondo quanto specificato nel comando SPEED 
INK. I colori della cornice sono compresi tra 0 e 26. 


Parole chiave associate: SPEED INK. 


BREAK 


(Si veda ON BREAK CONT, ON BREAK GOSUB, ON BREAK STOP). 


Capitolo 3 Pagina 6 Elenco completo delle parole chiave 


CALL 


CALL <espressione di indirizzo>[,<lista di parametri>] 
CALL 0 


COMANDO: Permette di richiamare da BASIC una subroutine sviluppata esternamente. 
La chiamata precedente riavvia il computer. 


Non è un comando da usare con leggerezza. 
Parole chiave associate: UNT. 
CAT 
CAT 
CAT 
COMANDO: CATaloga il disco. Visualizza, in ordine alfanumerico, i nomi completi di 
tutti i file trovati, insieme alla loro lunghezza (arrotondata per eccesso al Kbyte più 
vicino). Viene inoltre visualizzato lo spazio libero rimasto sul disco, insieme all’identi- 
ficazione dell’unità dischi e dell’utente. 
La catalogazione non ha effetti sul programma attualmente in memoria. 
Parole chiave associate: LOAD, RUN, SAVE. 
CHAIN 
CHAIN <nome-file>[,<espressione di numero di linea>] 
CHAIN “testprog.bas”,350 
COMANDO: Carica un programma in memoria da disco, sostituendo il programma 
esistente. Il nuovo programma inizia l’esecuzione, dall’inizio oppure da una linea 


specificata nell’espressione opzionale <espressione di numero di linea>. 


I file protetti, (salvati con ,p) possono essere caricati ed eseguiti mediante il comando 


CHAIN. 
Parole chiave associate: CHAIN MERGE, LOAD, MERGE. 


Elenco completo delle parole chiave Capitolo 3 Pagina 7 


CHAIN MERGE 


CHAIN MERGE <nome-file>[,<espressione di numero di linea>][,DELETE <blocco 
di linee>] 


CHAIN MERGE “newrun.bas”,750,DELETE 400-680 


COMMAND: Carica un programma da disco, lo fonde con il programma attualmente in 
memoria e inizia ad eseguire il programma risultante, dall’inizio oppure da una linea 
specificata nell’<espressione di numero di linea> opzionale. Se prima di una operazione 
di CHAIN MERGE è necessario cancellare parte del programma originale, si può 
utilizzare l’opzione DELETE <blocco di linee>. 

Si osservi che i numeri di linea del precedente programma che sono presenti anche nel 


nuovo programma su cui si esegue l'operazione di CHAIN MERGE verranno sostituiti 
dalle linee del nuovo programma. 


I file protetti, (salvati con ,p) NON possono essere caricati ed eseguiti mediante il 
comando CHAIN MERGE. 
Parole chiave associate: CHAIN, DELETE, LOAD, MERGE. 


CHR$ 


CHR$(<espressione intera>) 


10 FOR x=32 TO 255 
20 PRINT x;CHR$(x), 
30 NEXT 

run 


FUNZIONE: Converte una <espressione intera> tra 0 e 255 nel suo equivalente carattere, 
utilizzando l’insieme di caratteri AMSTRAD mostrato nella parte 3 del capitolo “A 
vostra disposizione”. 


Si noti che i caratteri da 0 a 31 sono caratteri di controllo; per questo motivo il precedente 
esempio stampa solo i caratteri compresi tra 32 e 255. 


Parole chiave associate: ASC. 
CINT 
CINT(<espressione numerica>) 


10 n=1.9999 

20 PRINT CINT(n) 

run 

2 
FUNZIONE: Restituisce il valore dell’<espressione numerica>, Convertendola in un 
INTero compreso tra -32768 e 32767. 


Parole chiave associate: CREAL, FIX, INT, ROUND, UNT. 
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CLEAR 
CLEAR 
CLEAR 
COMANDO: Porta il valore di tutte le variabili a zero o nullo. Tutti i file aperti vengono 
abbandonati, tutte le funzioni utente vengono cancellate e BASIC è portato in modalità 
di calcolo in radianti. 
Parole chiave associate: nessuna. 
CLEAR INPUT 
CLEAR INPUT 
10 CLS 
20 PRINT “Digita le lettere!” 
30 FORt=1 TO 3000 
40 NEXT 
50 CLEAR INPUT 
run 


COMANDO: Elimina tutti i caratteri inseriti in precedenza da tastiera che si trovano 
ancora nel buffer. 


Per vedere gli effetti di questo comando, si esegua il precedente programma e si digitino 
le lettere quando richiesto. Quindi si cancelli la linea 50 del programma e si esegua 
nuovamente, notando la differenza. 

Parole chiave associate: INKEY, INKEY$, JOY. 

CLG 


CLGl[<inchiostro>] 


LOCATE 1,20 
CLG 3 


COMANDO: Pulisce lo schermo grafico utilizzando il colore della carta. Se viene speci- 
ficato l’<inchiostro>, lo schermo grafico viene portato a quel valore. 


Parole chiave associate: CLS, GRAPHICS PAPER, INK, ORIGIN. 
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CLOSEIN 
CLOSEIN 
CLOSEIN 
COMANDO: Chiude ogni file di input da disco (si veda OPENIN). 
Parole chiave associate: EOF, OPENIN. 
CLOSEOUT 
CLOSEOUT 
CLOSEOUT 
COMANDO: Chiude ogni file di output su disco (si veda OPENOUT). 
Parole chiave associate: OPENOUT. 
CLS 
CLS[#<canale >] 
10 PAPER#2,3 
20 CLS#2 
run 


COMANDO: Pulisce il canale dello schermo (finestra) e lo riporta al suo colore. Se non 
viene fornito nessun <canale >, viene pulito il flusso sullo schermo (#0). 


Parole chiave associate: CLG, INK, PAPER, WINDOW. 
CONT 


CONT 
CONT 


COMANDO: CONTinua l’esecuzione del programma, dopo una doppia pressione del 
tasto [ESC] oppure dopo aver incontrato un comando STOP nel programma. CONT 
prosegue l’esecuzione del programma se questo non è stato modificato oppure se non è 
protetto. 


Prima della CONTinuazione possono essere inseriti comandi diretti. 


Parole chiave associate: STOP. 
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COPYCHR$ 
COPYCHR$(#<canale >) 


10 CLS 

20 PRINT “angolo superiore” 
30 LOCATE 1,1 

40 a$=COPYCHR$(#0) 

50 LOCATE 1,20 

60 PRINT a$ 

run 


FUNZIONE: Copia un carattere dalla posizione corrente del canale (che DEVE essere 
specificato). Il programma precedente copia un carattere dalla locazione 1, 1 (angolo 
superiore sinistro) e lo riproduce nella locazione 1, 20. 


Se il carattere letto non viene riconosciuto, viene restituita una stringa nulla. 
Parole chiave associate: LOCATE. 
COS 


COS(<espressione numerica>) 


DEG 
PRINT COS(45) 
0.707106781 


FUNZIONE: Calcola il COSeno dell’<espressione numerica>. 


Si noti che si possono utilizzare DEG e RAD per ottenere il risultato dell’operazione 
rispettivamente in gradi o in radianti. 


Parole chiave associate: ATN, DEG, RAD, SIN. 
CREAL 
CREAL(<espressione numerica>) 


10 a=PI 
20 PRINT CINT(a) 
30 PRINT CREAL(a) 
run 

3 

3.14159265 


FUNZIONE: Restituisce il valore dell’<espressione numerica>, Convertendola in un 
numero REALE. 


Parole chiave associate: CINT. 
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CURSOR 
-CURSORIx<interruttore di sistema>][,<interruttore utente>] 


10 CURSOR 1 

20 PRINT “domanda?” 

30 a$=INKEYS:IF a$=”" THEN 30 
40 PRINT a$ 

50 CURSOR 0 

run 


COMANDO: Assegna al cursore il valore dell’interruttore di sistema o dell’interruttore 
utente, attivo o non attivo. I parametri <interruttore di sistema> e <interruttore utente> 


devono essere 0 (non attivo) o 1 (attivo). Nel precedente comando INKEYÈ$, in cui il 
cursore non risulta generalmente visibile, il cursore sarà attivo in seguito all’assegnamen- 


to del valore 1 (nella linea 10) all’<interruttore di sistema>. 


Il cursore viene visualizzato quando sia l’<interruttore di sistema> che l’<interruttore 
utente> sono attivi (hanno valore 1). L’<interruttore di sistema> viene automaticamente 
attivato per il comando INPUT, mentre è disattivato per INKEY$. 


Si consiglia di disattivare il cursore quando si stampa testo sullo schermo. 


E°’ possibile omettere uno dei due parametri singolarmente, ma non contemporane- 
amente. Se un parametro di interruttore viene omesso, quel particolare stato dell’interrut- 
tore non viene modificato. 


Parole chiave associate: LOCATE. 
DATA 


DATA<lista di:<costante> 


10 FORx=1 TO 4 

20 READ nome$,cognome$ 

30 PRINT nome$;” “;cognome$ 

40 NEXT 

50 DATA Luigi, Rossi, Piero, Bianchi 
60 DATA Sergio, Verdi, Alfredo, Testi 
run 


COMANDO: Dichiara i dati costanti che vengono usati in un programma. I dati possono 
essere inseriti nella variabile mediante il comando READ, dopo il quale il “puntatore” 
si sposta sul successivo elemento della lista DATA. Il comando RESTORE porta il 
puntatore ad una posizione specificata di DATA. 


Per ulteriori informazioni relative ai dati si consulti la parte 2 del capitolo “A vostra 
disposizione...”?. 


Parole chiave associate: READ, RESTORE. 
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DEC$ 
DEC$(<espressione numerica>,<maschera di formato>) 


PRINT DIOR OT7,"ECH#####H##, AH") 
£10,000,000 


FUNZIONE: Restituisce una stringa DECimale che rappresenta l’<espressione nume- 
rica>, utilizzando la <maschera di formato> specificata per controllare il formato di 
stampa della stringa ottenuta. 


La maschera di formato può contenere SOLO i caratteri: 


+-£$*#,.T 


L’uso di questi “specificatori di formato del campo” viene descritto sotto la parola chiave 


PRINT USING. 
Parole chiave associate: BIN$, HEX$, PRINT USING, STR$. 
DEF FN 


DEF FN<nome funzione>[(<parametri formali>)]=<espressione> 
10 t=TIME/300 
20 DEF FNorologio= INT(TIME/300- t) 
30 EVERY 100 GOSUB 50 
40 GOTO 40 
50 PRINT “Il programma e’ stato eseguito”; 
60 PRINT FNorologio;”secondi fa” 
70 RETURN 
run 


COMANDO: DEFinisce una FuNzione. BASIC permette al programma di definire e 
usare semplici funzioni che restituiscono valori. DEF FN è la parte di definizione di 
questo meccanismo e crea una funzione specifica del programma che opera all’interno 


del programma analogamente al modo in cui, ad esempio, opera COS come funzione 
predefinita di BASIC. 


(Si noti nell’esempio precedente come il valore della funzione FNorologio venga 
continuamente aggiornato anche se il programma viene bloccato temporaneamente 


premendo [ESC], oppure interrotto premendo due volte [ESC] e quindi riattivato con 
CONT). 


Parole chiave associate: nessuna. 
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DEFINT 
DEFINT <lista di:<insieme di lettere> 

10 DEFINT n 

20 numero=123.456 

30 PRINT numero 

run 

123 
COMANDO: Assegna ad una variabile il tipo per DIFetto INTero. Quando si incontra 
una variabile senza un esplicito contrassegno di tipo (! % $), viene assunto il tipo per 
difetto. Questo comando assegna come tipo per difetto delle variabili con prima lettera 
specificata il tipo INTero. Può essere utilizzata una lista di lettere iniziali, come: 

DEFINT a,b,c 


oppure può essere presentato un insieme inclusivo di lettere iniziali come: 
DEFINT a-z 
Parole chiave associate: DEFREAL, DEFSTR. 
DEFREAL 
DEFREAL <lista di:<insieme di lettere> 
DEFREAL x,a-f 
COMANDO: Assegna ad una variabile il tipo per DIFetto REALe. Quando si incontra 
una variabile senza un esplicito contrassegno di tipo (! % $), viene assunto il tipo per 
difetto. Questo comando assegna come tipo per difetto delle variabili con prima lettera 
specificata il tipo REALe. Può essere utilizzata una lista di lettere iniziali, come: 
DEFREAL a,b,c 
oppure può essere presentato un insieme inclusivo di lettere iniziali come: 


DEFREAL a-z 


Parole chiave associate: DEFINT, DEFSTR. 
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DEFSTR 
DEFSTAR z<lista di:<insieme di lettere> 
10 DEFSTR nome 
20 nome="Amstrad” 
30 PRINT nome 
run 
Amstrad 
COMANDO: Assegna ad una variabile il tipo per DIFetto STRinga. Quando si incontra 
una variabile senza un esplicito contrassegno di tipo (! % $), viene assunto il tipo per 
difetto. Questo comando assegna come tipo per difetto delle variabili con prima lettera 
specificata il tipo STRinga. Può essere utilizzata una lista di lettere iniziali, come: 
DEFSTR a,b,c 
oppure può essere presentato un insieme inclusivo di lettere iniziali come: 
DEFSTR a-z 
Parole chiave associate: DEFINT, DEFREAL. 
DEG 
DEG 
DEG 
COMANDO: Attiva il modo di calcolo in gradi. La condizione per difetto delle funzioni 
SIN, COS, TAN e ATNè in radianti. DEG predispone BASIC all’uso dei gradi fino ad 
una istruzione RAD, oppure NEW, CLEAR, LOAD, RUN, ecc. 


Parole chiave associate: ATN, COS, RAD, SIN, TAN. 
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DELETE 
DELETE «intervallo di linee> 
DELETE 100-200 


COMANDO: Cancella parte del corrente programma, come specificato nell’espressione 
<intervallo di linee>. 


E° possibile omettere il primo o l’ultimo numero dell’<intervallo di linee> per indicare 
“.. dall’inizio del programma” oppure “.. fino alla fine del programma”, cioè: 


DELETE -200 
o) 

DELETE 50- 
o) 

DELETE 


per cancellare l’intero programma. 
Parole chiave associate: CHAIN MERGE, RENUM. 
DERR 
DERR 
LOAD “xyz.abc” 


XYZ.ABC not found 
Ready 

PRINT DERR 

146 


FUNZIONE: Restituisce l’ultimo codice di errore rilevato dal sistema di gestione di 


disco. Il valore DERR può essere utilizzato per controllare quale errore su disco si è 
verificato. Si consulti l’elenco dei messaggi di errore presente nel capitolo “A vostra 
disposizione”. 


Parole chiave associate: ERL, ERR, ERROR, ON ERROR GOTO, RESUME. 
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DI 
DI 


10 CLS:TAG:EVERY 10 GOSUB 90 

20 X1=RND*320:X2=RND*320 

30 Y=200+RND*200:C$=CHR$(RND*255) 
40 FOR X=320-X1 TO 320+X2 STEP 4 

50 DI 

60 MOVE 320,0,1:MOVE X-2,Y:MOVE X,Y 
70 PRINT “ “;C$;;:FRAME 

80 EI:NEXT:GOTO 20 

90 MOVE 320,0:DRAW X+8,Y-16,0:RETURN 
run 


COMANDO: Disabilita le Interruzioni (ad eccezione dell’interruzione [ESC]) finchè 
non vengono riabilitate esplicitamente da El o implicitamente dal RETURN al termine 
di una subroutine di interruzione. 


Si noti che l’ingresso in una subroutine di interruzione provoca la disabilitazione delle 
interruzioni di eguale o minore priorità. 


Il comando viene usato per far eseguire il programma senza interruzioni: è il caso, ad 
esempio, di due routine interne ad un programma che competono per l’uso di risorse. Nel 
precedente esempio, il programma principale e la subroutine di interruzione competono 
per l’uso del monitor grafico. 


Ulteriori informazioni relative alle interruzioni si trovano nella parte 2 del capitolo “A 
vostra disposizione”. 


Parole chiave associate: AFTER, El, EVERY, REMAIN. 
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DIM 
DIM <lista di:<variabile con indice> 


10 CLS 

20 DIM amico$(5),telefono$(5) 

30 FORn=1 TO 5 

40 PRINT “Numero amico”;n 

50 INPUT “Inserisci nome”;amico$(n) 
60 INPUT “Inserisci n.tel.”;telefono$(n) 
70 PRINT 

80 NEXT 

90 FOR n=1 TO 5 

100 PRINT n;amico$(n),telefono$(n) 
110 NEXT 

run 


COMANDO: DIMensiona un vettore (array). DIM alloca lo spazio peri vettori e specifica 
il numero massimo di elementi. Si dovrà informare BASIC dello spazio che deve essere 
riservato per i vettori, altrimenti il valore -per difetto sarà 10. 

. Unvettore è indentificato da una <variabile con indice>, dove un nome di variabile viene 
utilizzato con un insieme di numeri con indice, in modo che ogni “elemento” del vettore 


possieda il suo valore individuale. Il controllo del vettore può avvenire mediante cicli 
FOR NEXT, ad esempio, che possono esaminare il vettore, operando su ogni elemento. 


Si noti che il minimo valore degli indici è zero (il primo elemento disponibile nel vettore). 
I vettori possono essere multidimensionali, ed ogni elemento di un simile vettore viene 
rappresentato mediante la sua posizione all’interno della struttura del vettore. Se, ad 
esempio, il vettore è definito come: 

DIM posizione$(20,20,20) 
un elemento del vettore verrà rappresentato come: 

posizione$(4,5,6) 


Parole chiave associate: ERASE. 
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DRAW 
DRAW c<coordinata x>,<coordinata y>[,[<inchiostro>][,<modo inchiostro>]] 


10 MODE 0:BORDER 0:PAPER 0:INK 0,0 
20 x=RND*640:y=RND*400:z=RND*15 
30 DRAW x,y,z 

40 GOTO 20 

run 


COMANDO: Traccia una linea sullo schermo grafico, dalla posizione corrente del 
cursore fino alla posizione assoluta specificata dalle coordinate x e y. L’<inchiostro> con 
cui si disegna la linea può essere specificato (compreso tra i valori 0 e 15). 


Il <modo inchiostro> opzionale determina il modo in cui la linea tracciata interagisce con 
quelle già presenti sullo schermo. I quattro <modi inchiostro> sono: 


0: Normale 

1: XOR (0 esclusivo) 
2: AND (E) 

3:OR (0) 


Parole chiave associate: DRAWR, GRAPHICS PEN, MASK. 
DRAWR 
DRAWR <spazio x>,<spazio y>[,[<inchiostro>][,<modo inchiostro>]] 


10 CLS:PRINT “Vengo di sopra?” 
20 MOVE 0,350:FOR n=1 TO 8 
30 DRAWR 50,0 

40 DRAWR 0,-50 

50 NEXT:MOVE 348,0:FILL 3 

60 GOTO 60 

run 


COMANDO: Traccia una linea sullo schermo grafico, dalla posizione corrente del 
cursore fino alla posizione relativa specificata da <spazio x e y>. L’<inchiostro> in cui 
si disegna la linea può essere specificato (compreso tra i valori 0..15). 
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Il <modo inchiostro> opzionale determina il modo in cui la linea tracciata interagisce con 
quelle già presenti sullo schermo. I quattro <modi inchiostro> sono: 


0: Normale 

1: XOR (0 esclusivo) 

2: AND (E) 

3: OR (0) 

Parole chiave associate: DRAW, GRAPHICS PEN, MASK. 
EDIT 

EDIT <numero linea> 


EDIT 20 


COMANDO: Visualizza la linea di programma specificata in <numero linea> sullo 
schermo insieme al cursore, pronta per le modifiche. 


Parole chiave associate: AUTO, LIST. 
EI 
El 

El 
COMANDO: Riabilita le interruzioni che sono state disabilitate mediante il comando DI. 
Se le interruzioni sono disabilitate in una subroutine di interruzione, vengono riabilitate 
automaticamente quando BASIC incontra il comando RETURN al termine della 


subroutine. 


Ulteriori informazioni relative alle interruzioni si trovano nella parte 2 del capitolo “A 
vostra disposizione”. 


Parole chiave associate: AFTER, DI, EVERY, REMAIN. 
ELSE 


(Si consulti IF). 
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END 
END 

END 
COMANDO: Termina l’esecuzione di un programma e ritorna al modo diretto. Un 
programma può contenere un numero arbitrario di comandi END, e viene auto- 
maticamente considerata la presenza di un END dopo la linea finale del programma. 
Parole chiave associate: STOP. 


ENT 


ENT <numero inviluppo>[,<sezione inviluppo>][,<sezione inviluppo>][,<sezione 
inviluppo>][,<sezione inviluppo>][,<sezione inviluppo>] 


10 ENT 1,10,-50,10,10,50,10 
20 SOUND 1,500,200,10,,1 
run 


COMANDO: Assegna l’inviluppo di tono al <numero inviluppo> specificato (nell’inter- 
vallo da 1 a 15), che viene utilizzato dal comando SOUND. Se il <numero inviluppo> 
è negativo (nell’intervallo - 1.. -15), l'inviluppo viene ripetuto per tutta la durata del 
comendo SOUND. 

Ciascuna <sezione inviluppo> può contenere 2 o 3 parametri. 

Se vengono usati 3 parametri, questi sono: 

<numero passi>,<dimensioni passi>,<tempo di pausa>. 

Parametro 1: <numero passi> 

Questo parametro specifica quanti diversi passi di tono devono essere attraversati durante 
la sezione inviluppo. In una sezione di una nota di durata 10 secondi, ad esempio, si 
possono desiderare 10 passi di tono di 1 secondo ciascuno. In questo caso il parametro 


<numero passi> usato dovrà essere 10. 


L’intervallo disponibile di <numero passi> è da 0 a 239. 
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Parametro 2: <dimensioni passi> 


Questo parametro deve essere nell’intervallo da -128 a +127. Passi negativi rendono più 
alto il tono della nota, mentre passi positivi lo rendono più basso. Il minimo periodo di 
tono è 0. L'elenco completo dei periodi di tono si trova nel capitolo “Riferimenti”. 


Parametro 3: <tempo di pausa> 


Questo parametro specifica la durata di passi in unità di 0.01 secondi (centesimi di 
secondo). I valori del <tempo di pausa> si trovano nell’intervallo tra 0 e 255 (dove 0 viene 
considerato come 256), perciò il tempo maggiore tra passi è di 2,56 secondi. 


Se vengono utilizzati due parametri, questi sono: 
<periodo di tono>,<tempo di-pausa> 
Parametro 1: <periodo di tono> 


Questo parametro fornisce un nuovo assegnamento assoluto per il periodo di tono (si veda 
il parametro 2 del comando SOUND). 


Parametro 2: <tempo di pausa> 


Questo parametro specifica la durata dei passi in unità di 0.01 secondi (centesimi di 
secondo). Ivalori del <tempo di pausa> si trovano nell’intervallo tra 0 e 255 (dove 0 viene 
considerato come 256), o 2,56 secondi. 


In generale 


Si noti che la lunghezza totale di tutti i <tempi di pausa> non deve risultare maggiore del 


parametro <durata> del comando SOUND, altrimenti il suono terminerà prima dell’e- 
secuzione di tutti i passi di tono (in questo caso, il resto dell’inviluppo di tono viene 
eliminato). 


Analogamente, se il parametro <durata> del comando SOUNO è più lungo della 
lunghezza totale di tutti i <tempi di pausa>, il suono proseguirà dopo l’esecuzione di tutti 
i passi di tono, rimanendo costante sull’ultimo tono. 


In un comando ENT possono essere utilizzate fino a 5 <sezioni inviluppo> diverse 
(ciascuna composta dai precedenti 2 o 3 parametri). 


Il primo passo di un inviluppo di tono viene eseguito immediatamente. 
Ad ogni assegnamento di un inviluppo di tono, il valore precedente viene perso. 


La specifica-di un <numero inviluppo> senza <sezioni inviluppo> annulla ogni valore 
precedente. 


Per maggiori informazioni relative ai suoni si consulti la parte 2 del capitolo “A vostra 
disposizione”. 


Parole chiave associate: ENV, SOUND. 
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ENV 


ENV <numero inviluppo>[,<sezione inviluppo>][,<sezione inviluppo>][,<sezione 
inviluppo>][,<sezione inviluppo>][,<sezione inviluppo>] 


10 ENV 1,15,-1,10,15,1,10 
20 SOUND 1,200,300,15,1 
run 


COMANDO: Fissa l’inviluppo del volume specificato nel <numero inviluppo> (da 1 a 
15) che viene usato dal comando SOUND. 


Ciascuna <sezione inviluppo> può contenere 2 o 3 parametri. 

Se vengono usati 3 parametri, questi sono: 

<numero passi>,<dimensioni passi>,<tempo di pausa>. 

Parametro 1: <numero passi> 

Questo parametro specifica quanti diversi passi di volume devono essere attraversati dal 
suono durante la sezione inviluppo. In una sezione di una nota di durata 10 secondi, ad 
esempio, si possono desiderare 10 passi di volume di 1 secondo ciascuno. In questo caso 
il parametro <numero passi> usato dovrà essere 10. 

L’intervallo disponibile di <numero passi> è da 0 a 127. 

Parametro 2: <dimensioni passi> 

Questo parametro può variare da un volume di livello 0 ad un volume di livello 15 
relativamente al passo precedente. I 16 diversi livelli di volume sono gli stessi presenti 
nel comando SOUND, tuttavia il parametro <dimensioni passi> usato può assumere 
valori tra -128 e +127; il livello del volume ritorna ciclicamente a 0 ogni 15 unità. 
Parametro 3: <tempo di pausa> 

Questo parametro specifica il tempo tra passi in unità di 0.01 secondi (centesimi di 


secondo). I valori del <tempo di pausa> devono trovarsi nell’intervallo tra 0 e 255 (dove 
0 viene considerato come 256), perciò il tempo maggiore tra passi è di 2,56 secondi. 
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Se vengono utilizzati due parametri, questi sono: 
<inviluppo hardware>,<periodo inviluppo> 
Parametro 1: <inviluppo hardware> 


Questo parametro specifica il valore che deve essere inviato al registro di forma 
dell'inviluppo del chip sonoro. 


Parametro 2: <periodo inviluppo> 


Questo parametro specifica il valore che deve essere inviato al registro di periodo 
dell'inviluppo del chip sonoro. 


Quando si usano inviluppi hardware si presuppone l’esistenza di una conoscenza 
hardware: in caso contrario, si suggerisce di usare un inviluppo software che comprenda 
un adatto parametro <tempo di pausa>. 

In generale 

Si noti che la lunghezza totale di tutti i <tempi di pausa> non deve risultare maggiore del 
parametro <durata> del comando SOUND, altrimenti il suono terminerà prima dell’e- 


secuzione di tutti i passi di volume (in questo caso, il contenuto rimanente dell’inviluppo 
di volume viene eliminato). 


Analogamente, se il parametro <durata> del comando SOUND è più lungo della 
lunghezza totale di tutti i <tempi di pausa>, il suono proseguirà dopo l’esecuzione di tutti 
i passi di volume, rimanendo costante sul livello finale. 


In un comando ENV possono essere utilizzate fino a 5 <sezioni inviluppo> diverse 
(ciascuna composta da 2 o 3 parametri). 


Il primo passo di un inviluppo di volume viene eseguito immediatamente. 
Ad ogni assegnamento di un inviluppo di volume, il valore precedente viene perso. 


La specifica di un <numero inviluppo> senza <sezioni inviluppo> annulla ogni valore 
precedente. 


Per maggiori informazioni relative ai suoni si consulti la parte 2 del capitolo “A vostra 
disposizione”. 


Parole chiave associate: ENT, SOUND. 
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EOF 
EOF 


10 OPENIN “tasti.wp” 
20 WHILE NOT EOF 
30 LINE INPUT #9,a$ 
40 PRINT a$ 

50 WEND 

60 CLOSEIN 

run 


FUNZIONE: Verifica se l'input da disco è alla fine del file. Restituisce -1 (vero) se nessun 
file è aperto o se il file è alla fine, altrimenti restituisce 0 (falso). 


Parole chiave associate: OPENIN, CLOSEIN. 
ERASE 
ERASE z<lista di:<nome variabile> 


DIM a(100),b$(100) 
ERASE a,b$ 


COMANDO: Cancella il contenuto di un vettore non più necessario, permettendo di 
utilizzare in altri modi la memoria. 


Parole chiave associate: DIM. 


ERL 
ERL 


10 ON ERROR GOTO 30 

20 GOTO 1000 

30 PRINT “errore nella linea”;,ERL 
40 END 

run 


FUNZIONE: Restituisce il numero di linea dell’ultimo errore incontrato. Nel precedente 
esempio si vedrà che l’errore si trova nella linea 20, e questo viene rilevato dalla funzione 
ERL. 


Parole chiave associate: DERR, ERR, ERROR, ON ERROR GOTO, RESUME. 
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ERR 
ERR 


GOTO 500 

Line does not exist 
Ready 

PRINT ERR 

8 


FUNZIONE: Restituisce il numero dell’ultimo ERRore incontrato. Si consulti l’elenco 
dei messaggi di errore riportato nel capitolo “Riferimenti”. Nell’esempio precedente si 
vedrà che l’errore numero 8 corrisponde a “Line does not exist”. 


Parole chiave associate: DERR, ERL, ERROR, ON ERROR GOTO, RESUME. 
ERROR 


ERROR <espressione intera> 


10 IF INKEY$=”" THEN 10 ELSE ERROR 17 
run 


COMANDO: Richiama l’errrore specificato nell’<espressione intera>. Nel capitolo 
“Riferimenti” viene fornito un elenco dei messaggi di errore da 1 a 32. BASIC tratterà 
l’ERROREe come se fosse stato effettivamente rilevato e passerà direttamente ad una 
routine di gestione degli errori, oltre a restituire i valori di ERR e di ERL. 


ERROR seguito da una <espressione intera> compresa tra 33 e 255 può essere utilizzato 
per creare messaggi di errore personalizzati, come nel seguente esempio: 


10 ON ERROR GOTO 100 

20 INPUT “inserisci un carattere”;a$ 
30 IF LEN(a$)<>1 THEN ERROR 100 
40 GOTO 20 

100 IF ERR=100 THEN 110 ELSE 130 
110 PRINT CHRS$(7) 

120 PRINT “Ho detto UN carattere!” 
130 RESUME 20 

run 


Parole chiave associate: ERL, ERR, ON ERROR GOTO, RESUME. 
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EVERY 
EVERY <periodo di tempo>[,<numero timer>] GOSUB <numero linea> 


10 EVERY 50,1 GOSUB 30 
20 GOTO 20 

30 SOUND 1,20 

40 RETURN 

run 


COMANDO: Richiama una subroutine BASIC ad intervalli regolari. Il <periodo di 
tempo> specifica l’intervallo in unità di 0.02 secondi (cinquantesimi di secondo). 

Il <numero timer> (compreso tra 0 e 3) specifica quale dei quattro timer deve essere usato. 
Il timer 3 presenta la priorità più elevata; il timer 0 (quello per difetto) ha priorità minima. 
E’ possibile associare una sottoroutine ad ogni timer. 

Per maggiori informazioni relative alle interruzioni si consulti la parte 2 del capitolo “A 
vostra disposizione”. 

Parole chiave associate: AFTER, REMAIN. 

EXP 


EXP(<espressione numerica>) 
PRINT EXP(6.876) 
968.743625 


FUNZIONE: Calcola “E” elevato alla potenza specificata nell’<espressione numerica>, 
dove “E” è circa 2.7182818, cioè quel numero il cui logaritmo naturale è 1. 


Parole chiave associate: LOG. 
FILL 


FILL <inchiostro> 


10 MODE 0 

20 FORn=1 TO 500 

30 PRINT “0” 

40 NEXT 

50 colorepenna=2+RND*13 
60 FILL colorepenna 

70 GOTO 50 

run 


COMANDO: Riempie un’area arbitraria dello schermo grafico. Gli estremi dell’area 
sono limitati da linee tracciate nel colore usato dalla penna grafica oppure nello stesso 
colore usato nell’area (compreso tra 0 e 15). 


Il riempimento inizia dalla corrente posizione del cursore: se questa posizione corris- 
ponde ad un estremo, non ci sarà riempimento. 


Parole chiave associate: GRAPHICS PEN. 
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FIX 
FIX (<espressione numerica>) 


PRINT FIX(9.99999) 
9 


FUNZIONE: Elimina la parte dell’<espressione numerica> posta a destra del punto 
decimale, arrotondandola verso lo zero. 


Parole chiave associate: CINT, INT, ROUND. 
FN 


(Si consulti DEF FN). 
FOR 


FOR c<variabile semplice>=<inizio> TO <fine>[STEP <passo>] 


10 FORn=2 TO 8 STEP 2 
20 PRINT n; 

30 NEXT n 

40 PRINT “chi ci piace?” 
run 


COMANDO: Esegue il corpo di un programma tra i comandi FOR e NEXT un certo 
numero di volte, incrementando la variabile di controllo tra un valore <inizio> e un valore 
<fine>. Se non viene specificato STEP <passo>, viene assunto |. 


Il valore di STEP <passo> può essere specificato come una <espressione numerica> 


negativa: in questo caso il valore del parametro di <inizio> deve essere maggiore del 
valore di <fine>, altrimenti la variabile di controllo non viene incrementata. 


I cicli FOR NEXT possono essere “annidati”’, cioè uno può essere definito all’interno di 
un altro, a sua volta definito all’interno di un altro, e così via. 


L’assegnamento del nome della variabile al comando NEXT è opzionale, poichè BASIC 
troverà automaticamente a quale comando FOR è associato un NEXT “anonimo”. 


Parole chiave associate: NEXT, STEP, TO. 
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FRAME 
FRAME 


10 MODE 0 

20 PRINT “FRAME non attivo” 
30 TAG 

40 MOVE 0,200 

50 FOR x=0 TO 500 STEP 4 
60 IF f=1 THEN FRAME 

70 MOVE x,200 

80 PRINT “ “;CHR$(143) 


90 NEXT 

100 IF f=1 THEN RUN 

110 CLS 

120 TAGOFF 

130 PRINT “FRAME attivo” 
140 f=1 

150 GOTO 30 

run 


COMANDO: Sincronizza la scrittura di grafici sullo schermo insieme alla ricomposizi- 
one del video. L’effetto complessivo è che il movimento dei caratteri o della grafica 
risulta più dolce, senza effetti di scatti o lampeggi. 


Parole chiave associate: TAG, TAGOFF. 


FRE 


FRE (<espressione numerica>) 
FRE (<espressione di stringa>) 


PRINT FRE(0) 
PRINT FRE(”) 


FUNZIONE: Stabilisce quanta memoria libera rimane, non usata da BASIC. La forma 
FRE(””) provoca un’operazione di pulizia della memoria (”’ garbage collection’) prima di 
restituire un valore corrispondente allo spazio disponibile. 


NOTA: BASIC utilizza solo 64K di memoria. 


Parole chiave associate: HIMEM, MEMORY. 
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GOSUB 
GOSUB <numero linea> 
GOSUB 210 
COMANDO: Esegue una subroutine BASIC portandosi direttamente al <numero linea> 


specificato. La fine della subroutine è contrassegnata dal comando RETURN, e dopo il 
suo raggiungimento il programma prosegue l’esecuzione dall’istruzione successiva al 


comando GOSUB. 
Parole chiave associate: RETURN. 
GOTO 
GOTO <numero linea> 
GOTO 90 
COMANDO: Va ad un numero di linea specificato. 
Parole chiave associate: nessuna. 
GRAPHICS PAPER 
GRAPHICS PAPER c<inchiostro> 


10 MODE 0 

20 MASK 15 

30 GRAPHICS PAPER 3 
40 DRAW 640,0 

run 


COMANDO: Assegna l’”inchiostro” alla carta grafica, cioè alla zona posta dietro i 
grafici presenti sullo schermo. Quando vengono tracciate linee continue, la carta grafica 
non viene vista. Nell'esempio precedente, il comando MASK abilita la realizzazione di 
una linea e la visualizzazione della carta grafica. 


L’inchiostro della carta grafica (compreso tra i valori 0 e 15) viene usato per la zona di 
“carta” dove vengono scritti i caratteri quando TAG è attivo, e come valore per difetto 
quando si pulisce la finestra grafica, mediante CLG. 


Parole chiave associate: CLG, GRAPHICS PEN, INK, MASK, TAG, TAGOFF. 
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GRAPHICS PEN 
GRAPHICS PEN [<inchiostro>][,<modo sfondo>] 


10 MODEO 

20 GRAPHICS PEN 15 
30 MOVE 200,0 

40 DRAW 200,400 

50 MOVE 639,0 

60 FILL 15 

run 


COMANDO: Assegna il valore di <inchiostro> (compreso tra 0 e 15) usato per tracciare 
linee e punti. Il <modo sfondo> grafico può inoltre assumere i valori: 


0: Sfondo opaco 
1: Sfondo trasparente. 


(Lo sfondo trasparente ha effetti sulla carta grafica dei caratteri scritti con TAG attivo, 
e gli intervalli nelle linee tratteggiate). 


E’ possibile omettere i due parametri, ma non entrambi contemporaneamente. Se un 
parametro viene omesso, quel valore non viene modificato. 


Parole chiave associate: GRAPHICS PAPER, INK, MASK, TAG, TAGOFF. 
HEX$ 
HEX$ (<espressione intera senza segno>[,<dimensione campo>]) 


PRINT HEX$(255,4) 
00FF 


FUNZIONE: Produce una stringa di cifre esadecimali che rappresentano il valore 
dell’<espressione intera senza segno>, utilizzando il numero di cifre esadecimali 
specificate nella <dimensione campo> (compresa tra 0 e 16). Se il numero di cifre 
specificato è troppo elevato, l’espressione risultante verrà completata con l’inserimento 
all’inizio di zeri; se il numero di cifre specificato non è sufficiente, l’espressione ottenuta 
NON verrà abbreviata fino al numero di cifre specificato, ma verrà presentata nel numero 
di cifre necessarie. 


L’<espressione intera senza segno> che deve essere convertita in forma esadecimale 
deve presentare un valore compreso tra -32768 e 65535. 


Parole chiave associate: BIN$, DEC$, STR$, UNT. 


Elenco completo delle parole chiave Capitolo 3 Pagina 31 


HIMEM 
HIMEM 


PRINT HIMEM 

42619 
FUNZIONE: Restituisce l’indirizzo del più elevato byte di memoria usato da BASIC (che 
può essere alterato dal comando MEMORY). 


NOTA: BASIC utilizza solo 64K di memoria. 


Parole chiave associate: FRE, MEMORY, SYMBOL, SYMBOL AFTER. 
IF 


IF <espressione logica> THEN <parte opzione> [ELSE <parte opzione>] 


10 MODE 1 

20 x=CINT(RND*100) 

30 PRINT “Indovina il numero (da 0 a 100)” 
40 INPUT n 

50 IF n<x THEN PRINT n;”è troppo basso” 
60 IF n>x THEN PRINT n;”è troppo alto” 
70 IF n=x THEN 80 ELSE c=c+1:GOTO 40 
80 PRINT “Benissimo, l’hai centrato!” 

90 PRINT c+1;”tentativi!” 

run 


COMANDO: Determina se l’<espressione logica> è vera, e in questo caso esegue la 
prima <parte opzione>. Se l’<espressione logica> è falsa, viene eseguita la <parte 
opzione> specificata nella clausola ELSE, altrimenti BASIC passa alla linea successiva. 


I comandi IF THEN possono essere annidati ad una qualsiasi profondità e sono conclusi 
dalla fine della linea. Di conseguenza NON è possibile avere altre istruzioni indipendenti 
dal comando IF THEN sulla stessa linea. 


Quando il risultato dell’<espressione logica> richiede di saltare ad una linea particolare, 
il comando può assumere la forma seguente. 


Esempi: 
IF a=1 THEN 100 
oppure 
IF a=1 GOTO 100 
oppure 
IF a=1 THEN GOTO 100 
Parole chiave associate: ELSE, GOTO, THEN. 
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INK 
INK <inchiostro>,<colore>[,<colore>] 


10 MODE 1:PAPER O0:PEN 1 

20 FORp=0 TO 1 

30 FOR i=0 TO 26 

40 INK pii 

50 LOCATE 16,12:PRINT “inchiostro”;p;”,”;i 
60 FOR t=1 TO 400:NEXT t,i,p 

70 INK 0,1:INK 1,24:CLS 

run 


COMANDO: Assegna un colore (o più colori) ad un inchiostro specificato. Il parametro 
<inchiostro> rappresenta il riferimento all’inchiostro, che deve essere un’espressione 
intera da 0 a 15, per poter essere utilizzata nel corrispondente comando PEN o PAPER. 
Il primo parametro <colore> deve essere un’espressione intera con valore di colore 
compreso tra 0 e 26. Se viene specificato un secondo <colore> opzionale, l’inchiostro 
viene alternato tra i due colori, con una frequenza determinata dal comando SPEED INK. 


Parole chiave associate: GRAPHICS PAPER, GRAPHICS PEN, PAPER, PEN, 
SPEED INK. 


INKEY 
INKEY (<espressione intera>) 


10 IF INKEY(55)<>32 THEN 10 

20 PRINT “Hai premuto [SHIFT] e V” 
30 CLEAR INPUT 

run 


FUNZIONE: Interroga la tastiera per conoscere i tasti che sono stati premuti. La tastiera 
viene esaminata ogni 0.02 secondi (cinquantesimi di secondo). 


La funzione è utile per controllare se un particolare tasto viene tenuto premuto o meno, 
rilevando il valore restituito -1 (che si verifica a prescindere dallo stato dei tasti [SHIFT] 


e [CONTROL]). 


L’esempio precedente rileva quando i tasti [SHIFT] e V (tasto numero 55) sono premuti 
insieme, quindi termina il programma. Una spiegazione dei numeri dei tasti si trova nello 
schema sulla parte superiore destra del computer e nel capitolo “Riferimenti”. 
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Lo stato di [SHIFT] e [CONTROL] insieme al tasto specificato nell’<espressione 
intera> viene identificato nel modo seguente: 


Valore restituito [SHIFT] [CONTROL] tasto specificato 


-1 SU/GIU — SU/GIU SU 

0 SU SU GIU 
32 GIU SU GIU 
128 SU GIU GIU 
160 GIU GIU GIU 


Parole chiave associate: CLEAR INPUT, INKEY$, JOY. 
INKEY$ 
INKEY$ 


10 CLS 

20 PRINT “Selezioni Si o No (S/N)?” 
30 a$=INKEY$ 

40 IF a$=”"" THEN 30 

50 IF a$="s” OR a$="S” THEN 80 
60 IF a$="n” OR a$="N” THEN 90 
70 GOTO 30 

80 PRINT “Hai selezionato Si”:END 
90 PRINT “Hai selezionato No” 

run 


FUNZIONE: Interroga la tastiera e restituisce il valore della stringa corrente corrispon- 
dente al tasto premuto. Se non vengono premuti tasti, INKEY$ restituisce una stringa 
vuota. Nell'esempio precedente, le linee 40 e 70 indicano al programma di ritornare alla 
linea 30 dopo aver interrogato la stringa ricevuta dalla tastiera. 


Parole chiave associate: CLEAR INPUT, INKEY. 
INP 


INP(<numero porta>) 


PRINT INP(&FF77) 
255 


FUNZIONE: Restituisce il valore in ingresso dall’indirizzo di I/O specificato in 
<numero porta>. 


Parole chiave associate: OUT, WAIT. 
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INPUT 
INPUT[#<canale>,][;][<stringa con apice><separatore>]<lista di:<variabile> 

10 MODE 1 

20 INPUT “Dammi due numeri da moltiplicare (separati da una 
virgola)”;a,b 

30 PRINT a;”per”;b;”"e”;a*b 

40 GOTO 20 

run 


COMANDO: Accetta dati in ingresso dal canale specificato (se non specificato, dal 
canale #0). 


Il primo punto e virgola [;], opzionale, elimina il carattere di ritorno carrello/nuova linea 
che viene altrimenti inserito dopo l’esecuzione del comando. 


Il <separatore> deve essere un punto e virgola o una virgola. Un punto e virgola provoca 
la visualizzazione di un punto di domanda; una virgola elimina il punto di domanda. 


Se viene inserito un dato di tipo errato, come la lettera O invece di 0 (zero), quando si 
digitano variabili numeriche, BASIC risponde con: 


?Redo from start (Ripeti dall'inizio) 
e visualizza quindi il testo di prompt previsto. 
Tutte le risposte date da tastiera devono essere concluse premendo il tasto [RETURN]. 


Parole chiave associate: LINE INPUT. 
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INSTR 


INSTR([<posizione inizio>,]<espressione esaminata>,<stringa cercata>) 


10 CLS 

20 alfabeto$="ABCDEFGHI/KLMNOPQRSTUVWXYZ” 
30 INPUT “Inserisci una lettera”;a$ 

40 b$=UPPER$(a$) 

50 PRINT b$;” è un numero”; 

60 PRINT INSTR(alfabeto$,b$) 

70 PRINT “nell’alfabeto.”:PRINT 

80 GOTO 40 

run 


FUNZIONE: Esamina la prima <espressione esaminata> per trovare la <stringa cercata> 
e restituisce la posizione della sua prima occorrenza all’interno dell’<espressione 
esaminata>. Se la <stringa cercata> non si trova nell’<espressione esaminata>, viene 
restituito 0. 


La posizione da cui iniziare la ricerca della stringa può essere specificata mediante il 
parametro opzionale <posizione inizio>, che deve contenere un numero intero compreso 
tra 1 e 255. 

Parole chiave associate: nessuna. 

INT 


INT(<espressione numerica>) 


PRINT INT(-1.995) 

-2 
FUNZIONE: Arrotonda il numero al minore INTero vicino, eliminando la parte frazio- 
naria. Nel caso di valori positivi restituisce lo stesso valore di FIX, mentre per i valori 


negativi non interi restituisce un numero in meno rispetto a FIX. 


Parole chiave associate: CINT, FIX, ROUND. 
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JOY 
JOY{(<espressione intera>) 


10 PRINT “Per fermare il programma -”; 
20 PRINT “usare il joystick” 

30 IF JOY(0)<>0 THEN END 

40 GOTO 10 

run 


FUNZIONE: Legge un risultato da leggere da bit a bit dal JOYstick specificato 
nell’<espressione intera> (0 o 1). 


Bit Decimale 
0:Su 1 
1:Giù 2 
2:Sinistra 4 
3:Destra 8 
4:Fuoco 2 16 
S:Fuoco 1 32 


Quindi, ad esempio, se il pulsante principale di “fuoco” (Fuoco 2) del primo joystick 
viene premuto mentre l'impugnatura viene spostata verso sinistra, la funzione JOY(0) 
restituisce il valore decimale 20, corrispondente a 16 (Fuoco 2) + 4 (Sinistra). 


Maggiori informazioni relative ai joystick si trovano nel capitolo “Riferimenti”. 
Parole chiave associate: CLEAR INPUT, INKEY. 
KEY 


KEY <numero di espansione simbolo>,<espressione di stringa> 


KEY 11,”border 13:paper O:pen 1:ink 0,13: 
ink 1,0:mode 2:list"+CHR$(13) 


si prema ora il tasto [IRETURNI]. 


COMANDO: Assegna l’<espressione di stringa> al <numero di espansione simbolo> 
specificato. Possono essere gestiti trentadue simboli di espansione, compresi tra 0 e 31, 
corrispondenti ai valori da 128 a 159. I tasti da 128 (0 sul tastierino numerico) a 140 
([CONTROL][RETURN]) vengono assegnati per difetto alla stampa dei numeri da 0 a 
9, di un punto decimale, di [RETURN] e di RUN”[RETURN] - (per operazioni su 
cassette), ma possono essere riassegnati ad altre <espressioni di stringa> . I simboli di 
espansione da 13 a 31 (valori da 141 a 159) sono stringhe normalmente vuote, ma possono 
essere espansi e assegnati a tasti, utilizzando il comando KEY DEF descritto nell’esem- 
pio seguente. 
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Il <numero di espansione simbolo> dato nel comando KEY deve essere compreso tra 0 
e 31, o eventualmente tra 128 e 159 per avere una corrispondenza con i valori dei tasti (si 
faccia riferimento allo schema dei tasti nel capitolo “Riferimenti”’). 


Nell’<espressione di stringa> può essere espanso un totale di 120 caratteri. Tentativi di 
maggiori espansioni provocano un errore(5) “Improper argument”. 


Parole chiave associate: KEY DEF. 


KEY DEF 
KEY DEF <numero tasto>,<ripete>[,<normale>,[<maiuscolo>[,<control>]]] 


KEY 159, "questo e'’ il tasto Tab” 
KEY DEF 68,1,159 


si prema ora il tasto [TAB]. 


COMANDO: Definisce i valori dei tasti che devono essere restituiti dal <numero tasto> 
specificato, compresi tra 0 e 79 (per uno schema dei valori dei tasti si consulti il 
diagramma nella parte superiore destra del computer, oppure il capitolo “Riferimenti”). 
I parametri <normale>, <maiuscolo> e <control> devono contenere i valori da restituire 
quando vengono premuti, rispettivamente, da soli, insieme a [SHIFT] o insieme a [CON- 
TROL]. Ciascun parametro è opzionale. 


Il parametro <ripete> permette di assegnare un valore attivo-non attivo (1 o 0) alla 
funzione di auto ripetizione del tasto, regolando la velocità di auto ripetizione mediante 


il comando SPEED KEY. 
Nell’esempio precedente al tasto 159 (equivalente al simbolo di espansione 31) viene 
assegnata innanzitutto una stringa di espansione, quindi il comando DEF KEY definisce 
il tasto 68 (il tasto [TAB]) per auto ripetizione (1) e il suo ritorno al valore <normale> 
159 quando è premuto da solo. 
Nell’esempio prcedente, l’azione normale verrebbe ripristinata mediante: 

KEY DEF 68,0,9 
dove 9 è il normale valore ASCII per il carattere di tabulazione [TAB]. 


Parole chiave associate: KEY, SPEED KEY. 
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LEFT$ 
LEFT$(<espressione di stringa>,<lunghezza richiesta>) 


10 CLS 

20 a$="AMSTRAD” 
30 FOR n=1 T07 

40 PRINT LEFT$(a$,n) 
50 NEXT 

run 


FUNZIONE: Restituisce il numero di caratteri (compresi tra 1 e 255) specificato nel 


parametro <lunghezza richiesta>, dopo averli estratti dalla sinistra (LEFT) 
dell’<espressione di stringa>. Se l’<espressione di stringa> è minore della <lunghezza 
richiesta>, viene restituita tutta l’<espressione di stringa>. 


Parole chiave associate: MID$, RIGHT$. 
LEN 


LEN(<espressione di stringa>) 


10 LINE INPUT “Inserisci una frase”;a$ 
20 PRINT “La frase e’ lunga”; 

30 PRINT LEM(a$);”caratteri.” 

run 


FUNZIONE: Restituisce il numero totale di caratteri (1a lunghezza) dell’<espressione di 
stringa>. 


Parole chiave associate: nessuna. 
LET 
LET <variabile>=<espressione> 

LET x=100 
COMANDO: Assegna un valore ad una variabile. E’ un residuo dei primi BASIC in cui 
si dovevano vedere gli assegnamenti alle variabili. Non viene utilizzato nel BASIC 
AMSTRAD, e serve solo per assicurare la compatibilità con i programmi in precedenti 


BASIC forniti insieme ai manuali di istruzioni. L'esempio precedente può essere 
trasformato semplicemente in: 


x=100 


Parole chiave associate: nessuna 
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LINE INPUT 
LINE INPUT [#<canale>,][;][<stringa tra apici><separatore>]<variabile di stringa> 


10 LINE INPUT “Inserisci una linea di testo”;a$ 
20 CLS 

30 PRINT “La variabile a$ e’ uguale a:-” 

40 PRINT a$ 

run 


COMANDO: Accetta in ingresso un’intera linea di testo dal canale indicato (o dal canale 
#0 se non specificato). Il primo punto e virgola [;] opzionale elimina il carattere di ritorno 
carrello/nuova linea che viene altrimenti inserito dopo l’esecuzione del comando. 


Il <separatore> deve essere un punto e virgola o una virgola. Un punto e virgola provoca 
la visualizzazione di un punto di domanda; una virgola elimina il punto di domanda. 


LINE INPUT dalla tastiera viene terminato dalla pressione del tasto [RETURN]. 


LINE INPUT dal canale di disco (o di cassetta) #9 viene terminato dalla ricezione di un 
carattere di ritorno carrello o dall’assegnazione di 255 caratteri alla <variabile di stringa>, 
in base alla prima delle condizioni che si verifica. 


Parole chiave associate: INPUT. 


LIST 
LIST [<numeri di linea>][,#<canale>] 
LIST 100-1000,#1 


COMANDO: Elenca linee di programma sul canale specificato. Il canale #0 è il canale 
di schermo, assunto per difetto, mentre #8 è la stampante. L’operazione può essere 
interrotta temporaneamente premendo una volta [ESC] e ripristinata con la pressione 
della barra spaziatrice. Premendo [ESC] due volte si conclude l’operazione, ritornando 
al modo diretto. 


Il primo o l’ultimo numero del parametro <numeri di linea> possono essere omessi per 
indicare “dall’inizio del programma” o ‘fino alla fine del programma”, cioè: 


LIST -200 
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oppure 
LIST 50- 
oppure 
LIST 
per ottenere il listato dell’intero programma. 
Parole chiave associate: nessuna. 
LOAD 
LOAD <nomefile>[,<espressione di indirizzo>] 
LOAD “filedisc.xyz”,&2AF8 


COMANDO: Carica un programma BASIC da disco in memoria, sostituendo i pro- 
grammi eventualmente presenti. Specificando l’<espressione di indirizzo> opzionale si 
otterrà il caricamento del file binario a quell’indirizzo, invece dell’indirizzo in cui era 
stato salvato. 


Un programma BASIC protetto NON può essere caricato mediante il comando LOAD, 
perchè verrebbe immediatamente cancellato dalla memoria. Si usino in questo caso i 


comandi RUN o CHAIN. 
Parole chiave associate: CHAIN, CHAIN MERGE, MERGE, RUN, SAVE. 
LOCATE 


LOCATE [#<canale>,]<coordinata x>,<coordinata y> 


10 MODE 1 

20 FORn=1 TO 20 

30 LOCATE n,n 

40 PRINT CHR$(143);”locazione”; 
50 PRINT n;”,”;n 

60 NEXT 

run 


COMANDO: Localizza il cursore sul testo nel flusso indicato, alla posizione specificata 
dalle coordinate x e y, dove 1,1 è l’angolo superiore sinistro delcanale (finestra). Il canale 
#0 è il canale per difetto. 


Parole chiave associate: WINDOW. 
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LOG 
LOG(<espressione numerica>) 


PRINT LOG(9999) 
9.12024037 


FUNZIONE: Calcola il logaritmo naturale dell’<espressione numerica>, che deve essere 
maggiore di zero. 


Parole chiave associate: EXP, LOG10 


LOG10 
LOG10(<espressione numerica>) 


PRINT LOG10(9999) 
3.99995657 


FUNZIONE: Calcola il logaritmo in base 10 dell’<espressione numerica>, che deve 
essere maggiore di zero. 


Parole chiave associate: EXP, LOG. 
LOWER$ 


LOWER$(<espressione di stringa>) 


10 a$="GUARDA COME CAMBIANO LE LETTERE IN “ 
20 PRINT LOWER$(a$+’"MINUSCOLO?”) 
run 


FUNZIONE: Restituisce una nuova espressione di stringa che risulta essere una copia 
dell’<espressione di stringa> specificata, nella quale tutti i caratteri alfabetici compresi 
tra A e Z vengono convertiti in minuscolo. La funzione risulta utile per elaborare dati in 
ingresso che possono essere in caratteri maiuscoli o minuscoli. 


Parole chiave associate: UPPERÎ$. 
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MASK 
MASK [<espressione intera>][,<assegnazione primo punto>] 


10 MODE 0:INK 5,21:INK 8,16 

20 MOVE -100*RND,400*RND 

30 WHILE XPOS<640 

40 FORx=1 TO 8 

50 MASK 2î8-x) 

60 DRAWAR 32,0,x,1:MOVER -32,0 
70 NEXT 

80 MOVER 34,0 

90 WEND:GOTO 20 

run 


COMANDO: Predispone la “maschera” che deve essere usata quando vengono tracciate 
delle linee. Il valore binario dell’<espressione intera> compresa tra 0 e 255 assegna ai bit 
di ogni gruppo di pixel adiacenti il valore ON (1) o OFF (0). 


L’<assegnazione primo punto> determina se il primo punto della linea deve essere 
inserito (1) o meno (0). 


E’ possibile omettere i parametri, ma non entambi contemporaneamente. Se un parame- 
tro viene omesso, quel particolare valore non viene modificato. 


Parole chiave associate: DRAW, DRAWR, GRAPHICS PAPER, GRAPHICS PEN. 


MAX 

MAX(<lista di:<espressione numerica>) 
10 n=66 
20 PRINT MAX(1,n,3,6,4,3) 
run 
66 


FUNZIONE: Restituisce il valore massimo della <lista di:<espressioni numeriche>. 


Parole chiave associate: MIN. 
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MEMORY 
MEMORY «espressione di indirizzo> 
MEMORY &20AA 


COMANDO: Alloca la quantità di memoria BASIC disponibile assegnando l’indirizzo 
del byte più elevato. 


NOTA: BASIC utilizza solo i primi 64K di memoria. 


Parole chiave associate: FRE, HIMEM, SYMBOL, SYMBOL AFTER. 
MERGE 


MERGE <nomefile> 
MERGE »carica.bas » 


COMANDO: Carica un programma da disco e lo aggiunge al programma attualmente in 
memoria. 


Si noti che i numeri di linea del vecchio programma esistenti anche nel nuovo programma 
che deve essere sottoposto a MERGE verranno riscritti dalle linee del nuovo programma. 


I file protetti (salvati con ,p) NON possono essere inseriti con MERGE nel programma 
corrente. 


Parole chiave associate: CHAIN, CHAIN MERGE, LOAD. 


MID$ 


MOD$(<espressione di stringa>,<posizione inizio>[,<lunghezza sottostringa>]) 


10 MODE 1:ZONE 3 

20 a$="ENCICLOPEDIA” 

30 PRINT “Fammi vedere come e' scritto “;a$ 
40 PRINT “OK....”:PRINT 

50 FOR n=1 TO LEN(a$) 

60 PRINT MID$(a$,n,1), 

70 FORt=1 TO 700:NEXT t,n 

80 PRINT:PRINT 

90 INPUT “Adesso inserisci un’altra parola”;a$ 
100 GOTO 50 

run 
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FUNZIONE: Restituisce una nuova sottostringa, che inizia alla <posizione inizio> 
dell’<espressione di stringa>, ed è lunga <lunghezza sottostringa> caratteri. Se il 
parametro <lunghezza sottostringa> non viene specificato, viene restituito ciò che rimane 
della <espressione di stringa> dopo la <posizione inizio>. 


Se la <posizione inizio> è maggiore della lunghezza totale dell’<espressione di stringa>, 
viene restituita una stringa vuota. La <posizione inizio> deve essere compresa tra 0 e 255. 


Parole chiave associate: LEFT$, RIGHT$. 


MID$ 


MID$(<variabile di stringa>,<posizione inserimento>[,<nuova lunghezza 
stringa>])=<nuova espressione stringa> 


10 a$="ciao” 

20 MID$(a$,2,2)="XX" 
30 PRINT a$ 

run 

cXXo 


COMANDO: Inserisce la <nuova espressione stringa> nella stringa specificata dalla 
<variabile di stringa>, iniziando dalla <posizione inserimento> e occupando come 


numero di caratteri la <nuova lunghezza stringa>. 


Si noti che quando MID$ viene usato come comando, dovrà essere utilizzata una 
<variabile di stringa> come a$, e NON una costante come “ciao”. 


Parole chiave associate: LEFT$, RIGHT$. 
MIN 
MIN(<lista di:<espressione numerica>) 


PRINT MIN(3,6,2.999,8,9,) 
2.999 


FUNZIONE: Restituisce il valore minimo della <lista di:<espressioni numeriche>. 


Parole chiave associate: MAX. 
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MOD 

<argomento> MOD <argomento> 
PRINT 10 MOD 3 
1 


PRINT 10 MOD 5 
0 


OPERATORE: Retistuisce il resto ottenuto dalla divisione del primo <argomento> per 
il secondo <argomento> ed eliminando i componenti interi: MODulo. 


Parole chiave associate: nessuna. 
MODE 
MODE <espressione intera> 


10 m=m+1:1IF m>2 THEN m=0 

20 MODEm 

30 PRINT “Questo è mode”;m 

40 PRINT “ora premi un tasto” 

50 IF INKEY$="”" THEN 50 ELSE 10 
run 


COMANDO: Modifica il modo schermo (0,1 o 2) e pulisce lo schermo con l’inchiostro 
0 (che può non essere il corrente inchiostro della carta). Tutte le finestre di testo e grafica 
vengono riportate a schermo intero, e i cursori grafico e di testo vengono diretti alle loro 
rispettive origini. 


Parole chiave associate: ORIGIN, WINDOW. 
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MOVE 
MOVE <coordinata x>,<coordinata y>[,[<inchiostro>][,<modo inchiostro>]] 


10 MODE 1:TAG 

20 x=RND*800-100:y=RND*430 
30 MOVE x,y 

40 PRINT “Sono qui!” 

50 GOTO 20 

run 


COMANDO: Sposta il cursore grafico sul punto assoluto specificato dalle <coordinata 
x> e <coordinata y>. Il parametro <inchiostro> opzionale può essere usato per modifi- 
care l’inchiostro della penna grafica, compreso tra i valori 0 e 15. 


Il <modo inchiostro> opzionale determina come il successivo inchiostro deve interagire 
con i caratteri già presenti sullo schermo grafico. I 4 <modi inchiostro> sono: 


0: Normale 

1: XOR (0 esclusivo) 
2: AND (E) 

3: OR (0) 


Parole chiave associate: MOVER, ORIGIN, XPOS, YPOS. 
MOVER 


MOVER <spostamento x>,<spostamento y>[,[<inchiostro'>][,<modo inchiostro>]] 


10 MODE 1:TAG:MOVE 0,16 

20 PRINT “La vita ha i suoi”; 

30 FORn=1 TO 10 

40 MOVER -32,16 

50 PRINT “alti”;:NEXT:PRINT “ e”; 
60 FOR n=1 TO 10 

70 MOVER -64,-16 

80 PRINT “bassi”;:NEXT 

run 


COMANDO: Porta il cursore grafico in un punto in posizione relativa alla posizione 
iniziale. La posizione relativa è specificata da <spostamento x> e <spostamento y>. Il 
parametro opzionale <inchiostro> può essere utilizzato per modificare l’inchiostro della 
penna grafica, con valore compreso tra 0 e 15. 


Il <modo inchiostro> opzionale determina come il successivo inchiostro deve interagire 
con i caratteri già presenti sullo schermo grafico. I 4 <modi inchiostro> sono: 


0: Normale 

1: XOR (0 esclusivo) 
2: AND (E) 

3: OR (0) 


Parole chiave associate: MOVE, ORIGIN, XPOS, YPOS. 
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NEW 
NEW 
NEW 


COMANDO: Cancella il programma corrente e le variabili presenti in memoria. Le 
definizioni dei tasti non vengono perse, le caratteristiche di visualizzazione come 
MODE, PEN, PAPER, INK non vengono modificate e lo schermo non viene pulito. 


Parole chiave associate: nessuna. 
NEXT 
NEXT [<lista di:<variabile>] 


10 FORa=1 T03 

20 FORb=0 TO 26 

30 MODE 1 

40 PEN a:BORDER b 

50 PRINT “penna”;a;”cornice”;b 
60 FOR c=1 TO 500 

70 NEXT c,b,a 

run 


COMANDO: Rappresenta il termine di un ciclo FOR. Il comando NEXT può essere 
anonimo oppure riferirsi al FOR corrispondente. Si noti che nell’esempio precedente la 
<lista di:<variabile> deve comparire in ordine inverso rispetto ai corrispondenti comandi 
FOR, in modo che i cicli “annidati” non si sovrappongano. 

Parole chiave associate: FOR, STEP, TO. 


NOT 

NOT <argomento> 
IF NOT “alan”<"bob” THEN PRINT “corretto” ELSE PRINT “sbagliato” 
sbagliato È 


IF NOT “cane”>”gatto” THEN PRINT “corretto” ELSE PRINT “sbagliato” 
corretto 


PRINT NOT 1 
0 

PRINT NOT 0 
1 


OPERATORE: Esegue operazioni booleane bit a bit su interi. Inverte ogni bit nell’argo- 
mento. 


Ulteriori informazioni relative alla logica si trovano nella parte 2 del capitolo “A vostra 
disposizione...”. 


Parole chiave associate: AND, OR, XOR. 
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ON BREAK CONT 
ON BREAK CONT 


10 ON BREAK CONT 

20 PRINT “Il programma CONTinuera'’ quando si cerchera' di *interrom- 
pere* con [ESC]":PRINT 

30 FOR t=1 TO 1000:NEXT:GOTO 20 

run 


COMANDO: Disabilita l’azione del tasto [ESC], che non blocca più il programma, 
facendone invece proseguirè l'esecuzione. Si dovrà porre molta attenzione quando si usa 
questo comando, poichè il programma proseguirà la sua esecuzione fino ad un completo 
riavvio del computer. Di conseguenza sarà necessario memorizzare un tale programma 
con SAVE prima di eseguirlo. 


ON BREAK CONT può essere disabilitato all’interno di un programma mediante ON 
BREAK STOP. 


Parole chiave associate: ON BREAK GOSUB, ON BREAK STOP. 
ON BREAK GOSUB 


ON BREAK GOSUB <numero linea> 


10 ON BREAK GOSUB 40 

20 PRINT “programma in esecuzione” 

30 GOTO 20. . 

40 CLS:PRINT “hai premuto [ESC] “; 

50 PRINT “due volte richiama la routine GOSUB” 
60 FOR t=1 TO 2000:NEXT 

70 RETURN 

run 


COMANDO: Ordina a BASIC di passare alla sottoroutine specificata nel <numero 
linea> quando il tasto [ESC] viene premuto due volte. 


Parole chiave associate: ON BREAK CONT, ON BREAK STOP, RETURN. 
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ON BREAK STOP 
ON BREAK STOP 


10 ON BREAK GOSUB 40 

20 PRINT “programma in esecuzione” 

30 GOTO 20 i 

40 CLS:PRINT “hai premuto [ESC] “; 

50 PRINT “due volte richiama la routine GOSUB” 
60 FOR t=1 TO 2000:NEXT 

65 ON BREAK STOP 

70 RETURN 

run 


COMANDO: Disabilita i comandi ON BREAK CONT e ON BREAK GOSUB, in 
modo che successive pressioni del tasto [ESC] possano arrestare il programma. Nell’e- 
sempio precedente, il comando ON BREAK GOSUB avrà effetto una sola volta, poichè 
viene disabilitato dalla linea 65 nella sottoroutine ON BREAK. 


Parole chiave associate: ON BREAK CONT, ON BREAK GOSUB. 
ON ERROR GOTO 


ON ERROR GOTO <numero linea> 


10 ON ERROR GOTO 60 

20 CLS:PRINT “Se incontri errori, “; 
30 PRINT “lista il programma” 

40 FOR t=1 TO 4000:NEXT 

50 GOTO 100 

60 PRINT “Errore rilevato alla linea”; 
70 PRINT ERL:PRINT:LIST 

run 


COMANDO: Quando nel programma viene rilevato un errore, si raggiunge il <numero 
linea> specificato. 


La forma del comando ON ERROR GOTO 0elimina la trappola per gli errori e ripristina 
il normale trattamento degli errori di BASIC. 


Si veda inoltre il comando RESUME. 


Parole chiave associate: DERR, ERL, ERR, ERROR, RESUME. 
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ON <espressione> GOSUB 


ON <selettore> GOSUB z<lista di:<numero linea> 


10 
20 
30 
40 
50 
60 
70 
80 
90 


PAPER 0:PEN 1:INK 0,1 

CLS:PRINT “MENU DI OPZIONI”:PRINT 
PRINT “1 - Modifica cornice”:PRINT 
PRINT “2 - Modifica penna”:PRINT 
PRINT “3 - Modifica modo”:PRINT 
INPUT “Inserisci selezione”;x 

ON x GOSUB 90,110,130 

GOTO 20 

b=b-1:IF b<0 THEN b=26 


100 BORDER b:RETURN 

110 p=p-1:1F p<2 THEN p=26 
120 INK 1,p:RETURN 

130 m=m-1:1F m<0 THEN m=2 
140 MODE m:RETURN 


run 


COMANDO: Seleziona una linea di subroutine da raggiungere, in base al valore del 
<selettore>, che deve essere un’espressione intera positiva compresa tra 0 e 255. L’ordine 
dei valori del <selettore> determina il <numero linea> che deve essere selezionato dalla 
<lista di:<numeri linea>. Nell’esempio precedente, selezionando 1 si ottiene un salto alla 
linea 90, selezionando 2 si ottiene un salto alla linea 110 e selezionando 3 si ottiene un 
salto alla linea 130. 


Se il valore del <selettore> è zero, o maggiore della quantità di <numeri linea> presenti 
nel comando, non verrà selezionata alcuna sottoroutine. 


Parole chiave associate: RETURN. 
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ON <espressione> GOTO 
ON <selettore> GOTO z<lista di:<numero linea> 


10 CLS:PRINT “MENU DI OPZIONI”:PRINT 
20 PRINT “1 - Lista programma”:PRINT 
30 PRINT “2 - Modifica e aggiungi”:PRINT 
40 PRINT “3 - Cataloga disco”:PRINT 

50 INPUT “Inserisci selezione”;x 

60 ON n GOTO 80,90,100 

70 GOTO 10 

80 LIST 

90 AUTO 

100 CAT 

run 


COMANDO: Seleziona una linea da raggiungere, in base al valore del <selettore>, che 
deve essere un'espressione intera positiva compresa tra 0 e 255. L’ordine dei valori del 
<selettore> determina il <numero linea> che deve essere selezionato dalla <lista 
di:<numeri linea>. Nell’esempio precedente, selezionando 1 si ottiene un salto alla linea 
80, selezionando 2 si ottiene un salto alla linea 90 e selezionando 3 si ottiene un salto alla 
linea 100. 


Se il valore del <selettore> è zero, o maggiore della quantità di <numeri linea> presenti 
nel comando, non verrà selezionata alcuna sottoroutine. 


Parole chiave associate: nessuna 
ON SQ GOSUB 
ON SQ(<canale>) GOSUB <numero linea> 


10 ENV 1,15,-1,1 

20 ON SQ(1) GOSUB 60 

30 MODE 0:ORIGIN 0,0,200,440,100,300 

40 FOR x=1 TO 13:FRAME:MOVE 330,200,x 
50 FILL x:NEXT:GOTO 40 

60 READ s:1F s=0 THEN RESTORE:GOTO 60 
70 SOUND 1,s,25,15,1 

80 ON SQ(1) GOSUB 60:RETURN 

90 DATA 50,60,90,100,35,200,24,500,0 

run 
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COMANDO: Esegue una subroutine BASIC quando è presente un elemento vuoto nella 
coda di suono data. Il <canale> deve essere un’espressione intera contenente uno dei 
valori seguenti: 


1: per il canale A 
2: per il canale B 
4: per il canale C 


Maggiori informazioni relative ai suoni si trovano nella parte 2 del capitolo A vostra 
disposizione”. 


Parole chiave associate: RETURN, SOUND, SQ 
OPENIN 
OPENIN <nomefile> 


10 REMOPEN di un file di INgresso da disco 
20 OPENIN”filedati”:INPUT #9,a,a$ 

30 CLOSEIN:PRINT “I 2 valori sono:” 

40 PRINT:PRINT a,a$ 

run 


COMANDO: Apre (OPEN) un file in INput da disco, perchè venga usato nel programma 
corrente. Il file di input aperto deve essere di tipo ASCII. 


L’esempio precedente funzionerà solo dopo aver creato il file mostrato nel prossimo 


esempio (sotto OPENOUTY). 

Parole chiave associate: CLOSEIN, EOF. 

OPENOUT 

OPENOUT <nomefile> 
10 REMOPEN di un file di uscita su disco 
20 INPUT “Dammi una variabile numerica”;a 
30 INPUT “Dammi una variabile stringa”;a$ 
40 OPENOUT “filedati” 
50 WRITE #9,a,a$ 
60 CLOSEOUT:PRINT “Dati salvati su disco” 
run 

COMANDO: Apre un file di output su disco. 


Parole chiave associate: CLOSEOUT. 
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OR 


<argomento> OR <argomento> 


IF “alan”<"bob” OR “gatto”>"cane” THEN PRINT “corretto” ELSE PRINT “sbagliato” 
corretto 


IF “bob”<”alan” OR “cane”>"”gatto” THEN PRINT “corretto” ELSE PRINT “sbagliato” 
sbagliato 


IF “alan”<"bob” OR “cane”>"”gatto” THEN PRINT “corretto” ELSE PRINT “sbagliato” 
corretto 


PRINT 10R1 
1 

PRINT 0 OR 0 
0 


PRINT 10RO0 
1 


OPERATORE: Esegue operazioni booleane bit a bit su interi. Il risultato è 1 a meno che 
entrambi gli argomenti siano 0. 


Ulteriori informazioni relative alla logica si trovano nella parte 2 del capitolo “A vostra 
disposizione”. 


Parole chiave associate: AND, NOT, XOR. 
ORIGIN 


ORIGIN <x>,<y>[,<sinistra>,<destra>,<alto>,<basso>] 


10 MODE 1:BORDER 13:TAG 

20 ORIGIN 0,0,100,540,300,100 

30 GRAPHICS PAPER 3:CLG 

40 FOR x=550 TO -310 STEP -10 

50 MOVE x,206 

60 PRINT “Questa e’ una finestra grafica “; 
70 FRAME:NEXT:GOTO 40 

run 


COMANDO: Assegna ai punti di origine dei grafici 0,0 la posizione specificata dalle 
coordinate <x> e <y>. 

Le dimensioni di una finestra grafica possono inoltre venire definite specificando gli 
ultimi quattro parametri opzionali. Se le coordinate specificate per la finestra grafica 
descrivono punti che si trovano oltre il bordo dello schermo, l’estremità della finestra 
grafica viene assunta al bordo dello schermo. 


Parole chiave associate: CLG. 
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OUT. 
OUT <numero porta>,<espressione intera> 


OUT &F8F4,&FF 


COMANDO: Invia il valore dell’<espressione intera> (compresa tra 0 e 255) all’indiriz- 
zo specificato nel <numero porta>. 


Non è un comando da usare con leggerezza. 


Parole chiave associate: INP, WAIT. 


PAPER 
PAPER [#<canale>],<inchiostro> 


10 MODE 0:PEN 0:INK 0,13 
20 FOR p=1 TO 15 

30 PAPER p:CLS 

40 LOCATE 7,12:PRINT “sfondo”:p 
50 FORt=1 TO 500;NEXT t,p 

run 


COMANDO: Assegna il colore dello sfondo per i caratteri. Quando i caratteri vengono 
scritti sullo schermo di testo, la cella del carattere viene riempita con l’<inchiostro> dello 
sfondo (di valore compreso tra 0 e 15) prima che il carattere venga scritto (se non è stato 
selezionato il modo trasparente). 


Se viene omesso il <canale>, viene considerato per difetto l’inchiostro dello sfondo 
relativo al canale #0. 


Il numero dei diversi colori di sfondo accettati dipende dal modo dello schermo. 


Parole chiave associate: GRAPHICS PAPER, INK, PEN. 
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PEEK 
PEEK(<espressione di indirizzo>) 


10 MODE 1:ZONE 7 

20 WINDOW 1,40,1,2:WINDOW #1,1,40,3,25 
30 PRINT “Indirizzo memoria” 

40 LOCATE 20,1:PRINT “Contenuto memoria” 
50 FORn=0 TO 65535 

60 p=PEEK(n) 

70 PRINT #1,n,”(&";HEX$(n);")"; 

80 PRINT #1,TAB(20);p,"(&”;HEX$(p);”)" 

90 NEXT 

run 


FUNZIONE: Restituisce il contenuto della locazione di memoria dello Z80 specificata 
nell’<espressione di indirizzo>, che deve essere compresa tra &0000 e &FFFF (da 0 a 


65535). In ogni caso PEEK restituisce il valore dell’indirizzo di RAM specificato (non 
di ROM), e sarà compreso tra &00 e &FF (da 0 a 255). 


Parole chiave associate: POKE. 


PEN 
PEN [#<canale>,][<inchiostro>][,<modo sfondo>] 


10 MODE 0:PAPER 0:INK 0,13 

20 FOR p=1 TO 15 

30 PEN p:PRINT SPACE$(47);"penna”;p 
40 FORt=1 TO 500:NEXT t,p:GOTO 20 
run 


COMANDO: Assegna il valore dell’<inchiostro> (compreso tra 0 e 15) che deve essere 
usato quando si scrive sul canale di schermo specificato (il canale #0 se non specificato). 
Il parametro <modo sfondo> può essere trasparente (1) oppure opaco (0). 


E’ possibile omettere uno degli ultimi due parametri, ma non entrambi contempora- 
neamente. Se viene omesso un parametro, quel particolare valore non viene modificato. 


Parole chiave associate: PAPER. 
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PI 
PI 


PRINT PI 
3.14159265 


FUNZIONE: Restituisce il valore del rapporto tra la circonferenza e il suo diametro. 
Parole chiave associate: DEG, RAD. 


PLOT 
PLOT «coordinata x>,<coordinata y>[,[<inchiostro>][,<modo'inchiostro>]] 


10 MODE 1:BORDER 0:PAPER 0:PEN 1 
20 INK 0,0:INK 1,26:INK 2,13,26:DEG 

30 FOR x=1 TO 360:ORIGIN 320,200 

40 DRAW 50*COS(x),50*SIN(x),1 

50 PLOT 100*COS(x),25*SIN(x):NEXT 

60 ORIGIN 0,0:t=TIME+700:WHILE TIME<t 
70 PLOT RND*640,RND*400:WEND 

80 PLOT RND*640,RND*400,2 

90 GOTO 90 

run 


COMANDO: Disegna un punto sullo schermo grafico, nella posizione assoluta specifi- 
cata dalle coordinate x e y. L’<inchiostro> con cui disegnare il punto può essere 
specificato (in valore compreso tra 0 e 15). 


Il <modo inchiostro> opzionale determina come l’inchiostro con cui si scrive interagisce 
con quanto già presente sullo schermo grafico. I quattro <modi inchiostro> sono: 


0: Normale 

1: XOR (0 esclusivo) 
2: AND (E) 

3: OR (0) 


Parole chiave associate: GRAPHICS PEN, PLOTR. 
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PLOTR 
PLOTR <spostamento x>,<spostamento y>[,[<inchiostro>][,<modo inchiostro>]] 


10 REM Usa i tasti cursore per tracciare linee 
20 BORDER 0:GRAPHICS PEN 1 

30 MODE 1:PLOT 320,200 

40 IF INKEY(0)=0 THEN PLOTR 0,1 


50 IF INKEY(1)=0 THEN PLOTR 1,0 

60 IF INKEY(2)=0 THEN PLOTR 0,-1 

70 IF INKEY(8)=0 THEN PLOTR -1,0 

80 IF INKEY(9)=0 THEN 30:REM copia=pulisci 
90 GOTO 40 


run 


COMANDO: Disegna un punto sullo schermo grafico, nella posizione specificata da 
<spostamento x> e <spostamento y>, relativa alla corrente posizione del cursore grafico. 
L’<inchiostro> in cui disegnare il punto può essere specificato (in valore compreso tra 
0e 15). 


Il <modo inchiostro> opzionale determina come l’inchiostro con cui si scrive interagisce 
con quanto già presente sullo schermo grafico. I quattro <modi inchiostro> sono: 


0: Normale 

1: XOR (0 esclusivo) 

2: AND (E) 

3:OR (0) 

Parole chiave associate: GRAPHICS PEN, PLOT. 


POKE 
POKE <espressione di indirizzo>,<espressione intera> 
10 FOR m=49152 TO 65535 
20 POKE m,100 
30 NEXT 
run 


COMANDO: Scrive il valore dell’<espressione intera> (compresa tra 0 e 255) diret- 
tamente nella memoria dello Z80 (RAM) nell’<espressione di indirizzo> specificata. 


Non è un comando da usare con leggerezza. 


Parole chiave associate: PEEK. 
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POS 
POS(#<canale>) 


10 MODE 1:BORDER 0:LOCATE 8,2 

20 PRINT “usare i tasti cursore destra/sinistra” 
30 WINDOW 1,40,12,12:CURSOR 1,1 

40 FORn=1 TO 19:PRINT CHR$(9);:NEXT 
50 IF INKEY(1)<>-1 THEN PRINT CHR$(9) 
60 IF INKEY(8)<>-1 THEN PRINT CHR$(8) 
70 LOCATE #1,2,24 

80 PRINT #1,"”cursore di testo “; 

90 PRINT #1,”posizione orizzontale ="; 

100 PRINT #1,POS(#0):GOTO 50 

run 


FUNZIONE: Restituisce la corrente POSizione orizzontale del cursore di testo relativa 
all’estremità sinistra della finestra di testo. Il <canale> DEVE essere specificato, e NON 
ha valore #0 per difetto. 


POS(#8) restituisce la corrente posizione orizzontale del carrello della stampante, in cui 
1 è l’estremo sinistro. 


POS(#9) restituisce la posizione logica nel canale del disco, cioè il numero di caratteri 
da stampare inviati alla stampante dopo l’ultimo carattere di ritorno carrello. 


Parole chiave associate: VPOS, WINDOW. 
PRINT 


PRINT[#<canale>,][<lista di:<elementi di stampa>] 


10 a$="piccola” 

20 b$="questa e’ una stringa piu’ lunga” 
30 PRINT a$;a$ 

40 PRINT a$;a$ 

50 PRINT 

60 PRINT b$;b$ 

70 PRINT b$;b$ 

run 


COMANDO: Stampa la <lista di:<elementi di stampa> sul canale specificato (sul canale 
#0 se non viene specificato un <canale >). 
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Si noti che quando viene usato un punto e virgola ; per indicare al computer di stampare 
l’<elemento di stampa> successivo accanto all’elemento precedente, BASIC controlla 
innanzitutto se l’<elemento di stampa> può essere inserito sulla stessa linea, altrimenti 
verrà stampato su una nuova linea, senza tener conto del punto e virgola. 


Si noti inoltre che quando viene usata una virgola , per indicare al computer di stampare 
l’<elemento di stampa> seguente nella successiva zona di stampa, BASIC verifica se 
l’elemento precedente non ha oltrepassato i limiti della zona corrente, altrimenti il 
seguente <elemento di stampa> viene stampato in una nuova zona. 


PRINT SPC 
PRINT TAB 


PRINT[#<canale>,][<lista di:<elemento di stampa>][;] 
[SPC (<espressione intera>)[<lista di:<elemento di stampa>] 


PRINT[#<canale>,][<lista di:<elemento di stampa>][;] 
[TAB(<espressione intera>)[<lista di:<elemento di stampa>] 


10 PRINT “questa e’ la funzione spec” 
20 FOR x=6 TO 15 

30 PRINT SPC(5)”a”;SPC(x)"b” 

40 NEXT 

50 PRINT “questa e’ la funzione tab” 
60 FOR x=6 TO 15 

70 PRINT TAB(5)”a”;TAB(x)"b” 

80 NEXT 

run 


SPC stampa il numero di spazi identificati nell’<espressione intera> e quindi 
l’<elemento di stampa> immediatamente accanto agli spazi (assumendo che l’<elemento 
di stampa> successivo possa essere inserito sulla linea). Di conseguenza non è necessario 
concludere SPC con un punto e virgola. 


TAB stampa il numero di spazi relativi all'estremità sinistra della finestra di testo e quindi 
l’<elemento di stampa> immediatamente accanto agli spazi (assumendo che l’<elemento 
di stampa> successivo possa essere inserito sulla linea). Di conseguenza non è necessario 
concludere TAB con un punto e virgola. Se la posizione corrente è maggiore della 
posizione richiesta, viene inserito un carattere di ritorno carrello, seguito dagli spazi 
necessari per raggiungere la posizione richiesta sulla linea successiva. 
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PRINT USING 


PRINT[#<canale>][<lista diselementi di stampa>][;] 
[USING <maschera di formato>][<separatore><espressione>] 


10 FOR x=1 TO 10 

20 n=100000*(RNDT5 

30 PRINT “merci”;,USING “########,.##°;n 
40 NEXT 

run 


PRINT USING permette di specificare il formato di stampa dell’espressione restituita 
dal comando PRINT. Questo avviene specificando una <maschera di formato> cui il 
risultato stampato deve corrispondere. Il <separatore> è una virgola o un punto e virgola. 
La <maschera di formato> è una espressione di stringa realizzata mediante i seguenti 
“indicatori di formato di campo”: 


Formati numerici 
All’interno del numero: 


# Ciascun # specifica una posizione di cifra. 
Esempio di maschera: ###### 


. Specifica la posizione del punto decimale. 
Esempio di maschera: ###### .## 


, (Specifica la posizione di una cifra). Può apparire solo PRIMA del punto decimale. 
Specifica che le cifre prima del punto decimale devono essere suddivise in gruppi 
di tre (per le migliaia), separati da virgole. 
Esempio di maschera: ######,.## 


Intorno al numero: 


££ (Specifica la posizione di due cifre). Specifica che un simbolo £ deve essere 
stampato immediatamente prima della prima cifra o del punto decimale (dopo un 
qualsiasi segno iniziale). Si noti che £ occuperà una delle posizioni delle cifre. 
Esempio di maschera: ££######,.## 

**.. (Specifica la posizione di due cifre). Specifica che tutti gli spazi iniziali devono 

essere sostituiti con * asterischi. 

Esempio di maschera: **######, .## 
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**£  (Specificala posizione di tre cifre) Rappresenta la combinazione delle due opzione 
££ e ** combinate, cioè la presenza di asterischi * iniziali e di un simbolo £. 
Maschera di esempio: **£######,.## 


$$ (Specifica la posizione di due cifre). Specifica che un simbolo $ deve essere 
stampato immediatamente prima della prima cifra o del punto decimale (dopo un 
qualsiasi segno iniziale). Si noti che $ occuperà una delle posizioni delle cifre. 
Maschera di esempio:$$######,.## 


**$ (Specificala posizione di tre cifre). Rappresenta la combinazione delle due opzioni 
$$ e ** combinate, cioè la presenza di asterischi * iniziali e di un simbolo $. 
Maschera di esempio: **$######,.## 


+ Specifica che deve essere stampato + 0 -, nel modo appropriato. Se all’inizio della 
maschera compare +, il segno + viene stampato immediatamente prima del numero 
(e di qualsiasi altro segno iniziale). Se il + appare alla fine della maschera, il segno 
viene stampato dopo il numero (e qualsiasi eventuale parte esponenziale). 
Maschera di esempio: +####.#### 


- Il segno - può apparire solo alla FINE di una maschera. Specifica che - deve essere 
stampato dopo ogni numero negativo (e qualsiasi eventuale parte esponenziale). 
Se il numero è positivo, verrà stampato uno spazio. Un segno - viene stampato per 
difetto prima di un numero negativo, se non richiesto diversamente tramite l’uso 
di questa maschera. 
Maschera di esempio: ####.####- 


TTT Specifica che il numero deve essere stampato utilizzando l’opzione esponente. I 


caratteri TE nella maschera devono apparire DOPO le posizioni delle cifre, ma 
PRIMA di segni + o - alla fine della maschera. 


Maschera di esempio: #.####TTTT+ 


La<maschera di formato> per un numero non può oltrepassare i 20 caratteri di lunghezza. 
I numeri vengono arrotondati per la quantità di cifre stampate. 


Se la maschera di formato è troppo piccola per l’espressione in ingresso, come ad esempio 
PRINT USING “####";12345678 


il risultato stampato NON viene ridotto per la maschera, ma viene stampato com- 
pletamente, e fatto precedere da un segno % che indica un “fallimento di formato”. 
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Formati di stringhe 


10 CLS:a$="abcdefghijkImnoparst” 

20 PRINT “espressione in ingresso= “;a$ 
30 PRINT:PRINT “! specificatore= “; 

40 PRINT USING “!”;a$ 

50 PRINT :PRINT “\spazi\ specificatore= “; 
60 PRINT USING “\ \";a$ 

70 PRINT:PRINT “& specificatore= “; 

80 PRINT USING “&”;a$ 

90 GOTO 90 

run 


Specifica che solo il primo carattere della stringa deve essere stampato. 
Maschera di esempio: ! 


\<spazi>\ 
Specifica che solo i primi x caratteri della stringa devono essere stampati, dove x 
è uguale alla lunghezza della maschera (incluse le barre inverse). 
Maschera di esempio: \ \ 


& Specifica che l’intera stringa deve essere stampata “come è”. 
Maschera di esempio: & 


La <maschera di formato> per una stringa non deve essere maggiore di 255 caratteri. 


Le <maschere di formato> numeriche e di stringa possono essere rappresentate da 
variabili di stringa, come ad esempio: 


10 a$="££######,.H#" 

20 b$="!" 

30 PRINT USING a$;12345.6789; 
40 PRINT USING b$;”sterline” 
run 


Ulteriori informazioni relative alla stampa formattata si trovano nella parte 2 del capitolo 
“A vostra disposizione”. 


Parole chiave associate: SPC, TAB, USING, ZONE. 
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RAD 
RAD 


RAD 


COMANDO: Attiva il modo di calcolo in RADianti. BASIC ritorna al modo radianti 
quando il computer viene acceso o riavviato, oppure quando si inviano i comandi NEW, 


CLEAR, LOAD, RUN, ecc. 
Parole chiave associate: ATN, COS, DEG, SIN, TAN. 


RANDOMIZE 
RANDOMIZE[<espressione numerica>] 


RANDOMIZE 123.456 
PRINT RND 
0.258852139 


COMANDO: Fissa il “seme” per il generatore casuale specificato nell’<espressione nu- 
merica>. Il generatore BASIC di numeri casuali produce una sequenza pseudo-casuale 
nella quale ogni numero dipende dal numero precedente, a partire dal numero seme 
specificato. La sequenza ottenuta è sempre la stessa. RANDOMIZE assegna il nuovo 
valore iniziale per il generatore di numeri casuali sia al valore specificato, sia ad un valore 
introdotto dall’utente se viene omessa l’<espressione numerica>. 


RANDOMIZE TIME produce una sequenza difficile da ripetere. 
Parole chiave associate: RND. 


READ 
READ z<lista di:<variabile> 


10 FORn=1 TO 8 

20 READ a$,c 

30 PRINT a$;” “;:SOUND 1,c:NEXT 

40 DATA queste,478,s0n0,426,8,379,note 

50 DATA 358,di,319,una,284,scala,253,musicale,239 
run 


COMANDO: Legge dati dalle istruzioni DATA e li assegna a variabili, spostando quindi 
automaticamente il puntatore al successivo elemento dell’istruzione DATA. Il comando 
RESTORE può essere utilizzato per riportare il puntatore all’inizio di una istruzione 
DATA. 

Ulteriori informazioni relative ai dati si trovano nella parte 2 del capitolo “A vostra 
disposizione”. 

Parole chiave associate: DATA, RESTORE. 
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RELEASE 
RELEASE c<canali di suono> 


10 SOUND 65,1000,100 

20 PRINT “Premi R per attivare il suono” 
30 IF INKEY(50)=-1 THEN 30 

40 RELEASE 1 

run 


COMANDO: Rilascia i canali di suono che si trovano in uno stato di “blocco” nel 
comando SOUND. 


I parametri <canali di suono> devono presentare un valore intero compreso tra 1 e 7, che 
opera nel modo seguente: 


: Rilascia il canale A 

: Rilascia il canale B 

: Rilascia i canali A e B 

: Rilascia il canale C 

: Rilascia i canali A e C 

: Rilascia i canali B e C 

: Rilascia i canali A e Be C 


NOIUDWULNT 


Ulteriori informazioni relative ai suoni si trovano nella parte 2 del capitolo “A vostra 
disposizione”. 


Parole chiave associate: SOUND. 
REM 
REM <resto della linea> 

10 REM Intergalactic Hyperspace Mega-Monster 

Invaders Deathchase by AMSOFT 

20 REM Copyright AMSOFT 1985 
COMANDO: Inserisce un commento in un programma. Il resto della linea viene ignorato 
da BASIC e può contenere qualsiasi carattere, compresi i due punti : che generalmente 


separano le istruzioni. 


AI posto di :REM può essere usato un carattere di apice singolo ‘ MA NON all’interno 
di istruzioni DATA, in cui ‘ viene trattato come parte di una stringa senza apici. 


Parole chiave associate: nessuna. 
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REMAIN 
REMAIN(<numero timer>) 


10 AFTER 500,1 GOSUB 40 

20 AFTER 100,2 GOSUB 50 

30 PRINT “programma in esecuzione”:GOTO 30 

40 REM Questa ruotine GOSUB non verra’ chiamata 
perche’ disabilitata in linea 80. 

50 PRINT:PRINT “Il timer 1 ora sara’ “; 

60 PRINT “disabilitato da REMAIN.” 

70 PRINT “Le unita’ di tempo restanti erano:”; 

80 PRINT REMAIN(1) 

run 


FUNZIONE: Restituisce il tempo residuo del timer specificato in <numero timer> 
(valore compreso tra 0 e 3) e lo disabilita. 

Ulteriori informazioni relative alle interruzioni si trovano nella parte 2 del capitolo “A 
vostra disposizione”, 

Parole chiave associate: AFTER, DI, El, EVERY. 

RENUM 

RENUMI[<nuovo numero linea>][,[<vecchio numero linea>][,<incremento>]] 


10 CLS 

20 REM questa diventera’ la linea 123 
30 REM questa diventera’ la linea 124 
40 REM questa diventera’ la linea 125 
RENUM 123,20,1 

LIST 


COMANDO: Rinumera le linee di un programma. 


Il parametro <vecchio numero linea> specifica il numero di linea corrente esistente in cui 
deve iniziare la rinumerazione. Se questo parametro viene omesso, la rinumerazione 
inizia dalla prima linea del programma. 

Il parametro <nuovo numero linea> specifica il nuovo numero di linea per le linee da 
rinumerare. Se questo parametro viene omesso, il programma verrà rinumerato a partire 
da linea 10. 

Il parametro <incremento> specifica il passo numerico tra ciascuna linea rinumerata. Se 
viene omesso, il valore del passo sarà 10. 

RENUM prende in considerazione tutte le chiamate di linea GOSUB, GOTO e altre. 
Tuttavia, i riferimenti ai numeri di linea all’interno delle espressioni di stringa, come 
quelli presenti nei comandi KEY, non vengono alterati, così come i riferimenti a linee 
all’interno delle istruzioni REM, o le <espressioni di numero di linea> nei comandi 


CHAIN o CHAIN MERGE. 


I numeri di linea sono validi se compresi tra 1 e 65535. 
Parole chiave associate: DELETE, LIST. 
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RESTORE 
RESTORE[<numero linea>] 


10 READ a$:PRINT a$;” “; 

20 RESTORE 50 

30 FOR t=1 TO 500:NEXT:GOTO 10 

40 DATA i dati ripristinati possono essere letti 
50 DATA nuovamente 

run 


COMANDO: Ripristina la posizione del “puntatore” all’inizio dell’istruzione DATA 
specificata nel <numero linea> opzionale. Se il parametro viene omesso, il puntatore 
viene ripristinato all’inizio della prima istruzione DATA. 


Ulteriori informazioni relative ai dati si trovano nella parte 2 del capitolo “A vostra 
disposizione”. 


Parole chiave associate: DATA, READ. 
RESUME 


RESUME[<numero linea>] 


10 ON ERROR GOTO 60 

20 FOR x=10 TO 0 STEP-1:PRINT 1/x:NEXT 
30 END 

40 PRINT “viene qui dopo l’errore” 

50 END 

60 PRINT “errore n.”;}ERR;”nella linea”;};ERL 
70 RESUME 40 

run 


COMANDO: Riprende la normale esecuzione di un programma dopo la rilevazione di 
un errore trattato mediante un comando ON ERROR GOTO. Se il numero di linea da 
cui riprendere non è specificato, il programma riprende l’esecuzione dalla stessa linea in 


cui è stato inizialmente rilevato l’errore. Si elimini il parametro <numero linea> 
nell’esempio precedente, quindi si esegua nuovamente. 


70 RESUME 
run 


Parole chiave associate: DERR, ERL, ERR, ERROR, ON ERROR GOTO, RESU- 
ME NEXT. 
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RESUME NEXT 
RESUME NEXT 


10 ON ERROR GOTO 90 

20 PRINT “premere [RETURN] ogni volta” 
30 INPUT “1”;a 

40 INPUT “2”;a 

50 inpot “3”;a :REM errore di sintassi! 

60 INPUT “4”;a 

70 INPUT “5”;a 

80 END 

90 PRINT “errore n.”;ERR;”nella linea”,ERL 
100 RESUME NEXT 

run 


COMANDO: Riprende la normale esecuzione di un programma dopo la rilevazione di 
un errore trattato mediante un comando ON ERROR GOTO. 


RESUME NEXT riprende l’esecuzione dalla linea successiva a quella in cui è stato 
rilevato l’errore. 


Parole chiave associate: DERR, ERL, ERR, ERROR, ON ERROR GOTO, RESU- 
ME. 


RETURN 
RETURN 


10 GOSUB 50:PRINT “dopo il gosub”:END 
50 FORn=1 TO 20 

60 PRINT “subroutine” 

70 NEXT:PRINT 

80 RETURN 

run 


COMANDO: Segnala la fine di una subroutine. BASIC rientra dalla subroutine all’istru- 
zione immediatamente successiva al comando GOSUB che l’ha richiamata. 


Parole chiave associate: GOSUB 
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RIGHT$ 
RIGHT$(<espressione di stringa>,<lunghezza richiesta>) 


10 MODE 1:a$="CPC6128 computer” 
20 FOR n=1 TO 16:LOCATE 41-n,n 
30 PRINT RIGHT$(a$,n) 

40 NEXT 

run 


FUNZIONE: Restituisce il numero di caratteri (compresi tra 0 e 255) specificati nel 
parametro <lunghezza richiesta>, dopo averli estratti dalla destra (RIGHT) 
dell’<espressione di stringa>. Se l’<espressione di stringa> è più breve rispetto alla 
<lunghezza richiesta>, viene restituita l’intera <espressione di stringa>. 


Parole chiave associate: LEFT$, MID$. 
RND 


RNDI[(<espressione numerica>)] 


10 RANDOMIZE 

20 FOR x=1 TO -1 STEP -1 
30 PRINT “parametro rnd=";x 
40 FOR n=1 TO 6 

50 PRINT RND(x) 

60 NEXT n,x 

run 


FUNZIONE: Restituisce il successivo numero casuale in sequenza se l’<espressione 
numerica> ha valore positivo oppure non è specificata. 


Se l’<espressione numerica> presenta valore zero, RND restituisce una copia dell’ultimo 
numero casuale generato. 


Se l’<espressione numerica> presenta valore negativo, viene iniziata una nuova sequenza 
di numeri casuali e viene restituito il primo numero di questa sequenza. 


Parole chiave associate: RANDOMIZE. 
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ROUND 
ROUND (<espressione numerica>[,<decimali>]) 
10 FORn=4 TO -4 STEP-1 
20 PRINT ROUND (1234.5678,n), 
30 PRINT “con espressione intera”;n 
40 NEXT 
run 
FUNZIONE: Arrotonda l’<espressione numerica> ad un numero con posizioni decimali 
o potenze di dieci specificati nel parametro <decimali>. Se <decimali> è minore di zero, 


l’<espressione numerica> viene arrotondata per ottenere un intero assoluto con un 
numero di <decimali> uguale a zero prima del punto decimale. 


Parole chiave associate: ABS, CINT, FIX, INT. 
RUN 
RUN <espressione di stringa> 

RUN “disco” 


COMANDO: Carica un programma BASIC o binario da disco e ne inizia l'esecuzione. 
Tutti i programmi BASIC precedentemente caricati vengono eliminati dalla memoria. 


In questo modo i programmi BASIC protetti possono essere eseguiti direttamente. 
Parole chiave associate: LOAD. 
RUN 
RUN [<numero linea>] 

RUN 200 
COMANDO: Inizia l’esecuzione del corrente programma BASIC, dal parametro 
<numero linea> specificato o dall’inizio del programma se il parametro viene omesso. 


RUN assegna a tutte le variabili del programma corrente il valore zero o nullo. 


I programmi protetti NON possono essere eseguiti in questo modo dopo il caricamento. 


Parole chiave associate: CONT, END, STOP. 
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SAVE 
SAVE <nomefile>[,<tipo file>][,<parametri binari>] 
SAVE “filedisc.xyZ” 
memorizza il file in normale modo BASIC non protetto. 
SAVE “filedisc.xyz”,P 
memorizza il file in modo BASIC Protetto. 
SAVE “filedisc.xyz”,A 
memorizza il file in modo ASCII. 
SAVE “filedisc.xyz”,B,8000,3000,8001 
memorizza il file in modo Binario. In questo esempio viene salvata l’area di memoria del 
computer che inizia all’indirizzo 8000; la lunghezza del file è di 3000 byte e l’indirizzo 
del punto di ingresso opzionale è 8001. 


COMANDO: Memorizza il programma attualmente in memoria su disco. Un file Binario 
è un’area di memoria salvata su disco. I parametri Binari sono: 


<indirizzo iniziale>,<lunghezza file>[,<punto di ingresso>] 


La memoria dello schermo può essere salvata come un file Binario: questa operazione è 
nota come “copia dello schermo” e può essere eseguita mediante il comando: 


SAVE “schermo”,B,&C000,&4000 
Quindi per riportarlo sullo schermo è sufficiente il comando: 
LOAD “schermo” 
Parole chiave associate: CHAIN, CHAIN MERGE, LOAD, MERGE, RUN. 
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SGN 
SGN(<espressione numerica>) 


10 FOR n=200 TO -200 STEP-20 

20 PRINT “SGN restituisce”; 

30 PRINT SGN(n);”per un valore di”;n 
40 NEXT 

run 


FUNZIONE: Determina il SeGNo dell’<espressione numerica>. SGN restituisce -1 se 


l’<espressione numerica> è minore di zero, 0 se l’<espressione numerica> è uguale a zero 
e 1 se l’<espressione numerica> è maggiore di zero. 


Parole chiave associate: ABS. 
SIN 
SIN(<espressione numerica>) 
10 CLS:DEG:ORIGIN 0,200 
20 FORn=0 TO 720 
30 y=SIN(n) 
40 PLOT n*640/720,198*y:NEXT 
50 GOTO 50 
run 


FUNZIONE: Calcola il seno dell’<espressione numerica>. 


Si noti che si possono utilizzare DEG e RAD per ottenere il risultato dell’operazione 
rispettivamente in gradi o in radianti. 


Parole chiave associate: ATN, COS, DEG, RAD, TAN. 


pnn——@—m_@—t1__o_oo____ m6@—_—_—_—_—_————_—_—_—_—_—__—_——___—_——_@—È______ÉÉnÉmk6-=m@____— 
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SOUND 


SOUND <stato canale>,<periodo di tono>[,<durata>[,<volume>[,<inviluppo 
volume>[,<inviluppo tono>[,<periodo rumore>]]]]] 


10 FORz=0 TO 4095 
20 SOUND 1,2,1,12 
30 NEXT 

run 


COMANDO: Programma un suono. Il comando accetta i seguenti parametri: 


Parametro 1: <stato canale> 


Il parametro <stato canale> deve contenere un intero compreso tra 0 e 255. Il parametro 
presenta bit significativi, ed ogni bit del valore binario dello <stato canale> assume il 
seguente significato: 


Bit 0:(decimale 1) invia il suono al canale A (bit meno significativo) 
Bit 1:(decimale 2) invia il suono al canale B 

Bit 2:(decimale 4) invia il suono al canale C 

Bit 3:(decimale 8) rendezvous con canale A 

Bit 4:(decimale 16) rendezvous con canale B 

Bit 5:(decimale 32) rendezvous con canale C 

Bit 6:(decimale 64) blocca il canale di suono 

Bit 7:(decimale 128) sblocca il canale di suono (bit più significativo) 


Di conseguenza un parametro <stato canale> di valore 68, ad esempio, significa: 
Invia a canale C (4) con stato di blocco (64). 

Parametro 2: <periodo tono> 

Questo parametro definisce il picco del suono, o, in altri termini, “quale nota è” (ad 
esempio, do re mi fa sol). Ogni nota possiede un particolare numero, che rappresenta il 
<periodo tono>. Si consulti il capitolo “Riferimenti”. 

Parametro 3: <durata> 

Questo parametro stabilisce la lunghezza del suono, cioè “quanto dura”: opera in unità 


di 0.01 secondi (centesimi di secondo), e se non viene specificato il computer utilizzerà 
un valore per difetto di 20 (un quinto di secondo). 
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Se il parametro <durata> è zero, il suono durerà fino al termine dell’inviluppo di volume 
specificato. 


Se il parametro <durata> è negativo, l’inviluppo di volume specificato deve essere 
ripetuto ABS(<durata>) volte. 


Parametro 4: <volume> 


Questo parametro specifica il volume iniziale di una nota. Il valore deve essere compreso 
tra 0 e 15: quando è 0, il volume è disabilitato, mentre a 15 è massimo. Se non viene 
specificato alcun numero, il computer utilizzerà un valore per difetto di 12. 


Parametro 5: <inviluppo volume> 


Perchè il volume possa variare durante l’emissione di una nota, è possibile specificare un 
inviluppo di volume utilizzando il comando separato ENV. Infatti si possono creare fino 
a 15 inviluppi di volume diversi, di valore compreso tra 1 e 15. Il parametro <inviluppo 
volume> richiama il numero di riferimento dell’inviluppo di volume necessario al 


comando SOUND. 

Si consulti la descrizione del comando ENV. 

Parametro 6: <inviluppo tono> 

Perchè il tono o il picco possa variare durante l’emissione di una nota, è possibile 
specificare un inviluppo di tono utilizzando il comando separato ENT. Infatti si possono 
creare fino a 15 inviluppi di tono diversi, di valore compreso tra 1 e 15. Il parametro 


<inviluppo tono> richiama il numero di riferimento dell’inviluppo di tono necessario al 
comando SOUND. Se nel comando ENT è stato specificato un numero di inviluppo 


negativo, si usi il valore assoluto di questo numero (cioè senza il segno di negazione) in 
questo parametro <inviluppo tono> del comando SOUND. 
Si consulti la descrizione del comando ENT. 


Parametro 7: <rumore> 


E’ disponibile un insieme di rumore bianco, che può essere disabilitato o aggiunto al 
suono variando il parametro <suono> tra 0 e 31. 


Ulteriori informazioni relative al suono si trovano nella parte 2 del capitolo “A vostra 
disposizione”. 


Parole chiave associate: ENT, ENV, ON SQ GOSUB, RELEASE, SQ. 
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SPACE$ 
SPACES$(<espressione intera>) 
10 MODE 1 
20 PRINT “Mette 9 spazi tra me”; 
30 PRINT SPACE$(9); 
40 PRINT “e tel” 
run 


FUNZIONE: Crea una stringa di spazi della lunghezza data (compresa tra 0 e 255), 
specificata nell’<espressione intera>. 


Parole chiave associate: SPC, STRING$, TAB. 
SPC 

(Si veda PRINT SPC). 

SPEEK INK 

SPEED INK <periodo 1>,<periodo 2> 


10 BORDER 7,18 
20 FOR i=30 TO 1 STEP-1 


30 SPEED INK ji 
40 FORt=1 TO 700:NEXT t,i 
run 


COMANDO: Determina la frequenza con cui si devono alternare due colori di inchiostro 
specificati in un comando INK o BORDER. <periodo 1> specifica il tempo, in unità di 
0.02 secondi (cinquantesimi di secondo) per il primo colore da usare; <periodo 2> 
specifica il tempo per il secondo colore. 


E’ necessario usare un po' di buon senso per evitare effetti ipnotici quando si scelgono i 
colori e le frequenze di ripetizione! 


Parole chiave associate: BORDER, INK. 
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SPEED KEY 
SPEED KEY <ritardo inizio>,<periodo ripetizione> 


10 CLS:FOR k=7 TO 1 STEP-2 

20 PRINT “inserisci il tuo nome, poi [RETURN]” 
30 SPEED KEY k,k 

40 LINE INPUT a$:NEXT 

50 PRINT “Che nome buffo!” 

run 


COMANDO: Assegna la frequenza di autoripetizione alla tastiera. Il parametro <ritardo 
inizio> specifica il tempo, in unità di 0.02 secondi (cinquantesimi di secondo) prima 
dell’inizio dell’autoripetizione. Il parametro <periodo ripetizione> assegna l’intervallo 
tra ciascuna autoripetizione di un tasto. 

SPEED KEY avrà effetto solo sui tasti dotati per difetto di autoripetizione, oppure 
definiti con autoripetizione mediante il comando KEY DEF. 

Quando si desidera utilizzare piccoli valori di <ritardo inizio>, è consigliabile prepro- 
grammare uno dei tasti numerici per riportare la tastiera al valore di SPEED KEY per 
difetto di 30,2. Questo si può ottenere con il comando: 


KEY 0,"SPEED KEY 30,2"+CHR$(13) 


che riporta SPEED KEY al suo valore per difetto quando viene premuto il tasto 0 del 
tastierino numerico. 


Parole chiave associate: KEY DEF. 

SPEED WRITE 

SPEED WRITE «espressione intera> 
SPEED WRITE 1 


COMANDO: Determina la velocità di memorizzazione dei dati su cassetta (se l’unità a 
cassette è connessa). Si può scrivere su cassetta alla velocità di 2000 baud (bit per 
secondo) se l’<espressione intera> è 1, oppure alla velocità per difetto di 1000 baud se 
l’<espressione intera> è 0. Quando si carica in memoria un file su nastro, il computer 
seleziona automaticamente la corretta velocità di trasferimento. 


Per l’affidabilità di dati importanti, è consigliabile l’uso di SPEED WRITE 0 (valore per 
difetto). 


Il comando SPEED WRITE non ha effetti sulle operazioni con i dischi. 
Parole chiave associate: OPENOUT, SAVE. 


Capitolo 3 Pagina 76 . Elenco completo delle parole chiave 


SQ 
SQ(<canale>) 
10 SOUND 65,100,100 
20 PRINT SQ(1) 
run 
67 


FUNZIONE: Restituisce lo stato della coda di suono per il <canale> specificato, che deve 
essere un’espressione intera, con uno dei seguenti valori: 


1: per il canale A 
2: per il canale B 
4: per il canale C 


La funzione SQ restituisce un intero relativo ai bit significativi, comprendente la 
seguente configurazione di bit: 


Bit 0, 1 e 2: numero di elementi liberi nella coda 
Bit 3,4e 5: stato di rendezvous all’inizio della coda 
Bit 6 : l’inizio della coda è bloccato 

Bit 7 : il canale è correntemente attivo 


dove il bit 0 è il bit meno significativo, mentre il bit 7 è quello più significativo. 


Si può vedere inotre che se il bit 6 è attivo, il bit 7 non può essere attivo e viceversa. 
Analogamente se i bit 3, 4 o 5 sono attivi, i bit 6 e 7 non possono essere attivi. 


Ulteriori informazioni relative al suono si trovano nella parte 2 del capitolo “A vostra 
disposizione” 


Parole chiave associate: ON SQ GOSUB, SOUND. 
SQR 
SQR (<espressione numerica>) 


PRINT SQR(9) 
3 


FUNZIONE: Restituisce la radice quadrata dell’<espressione numerica> specificata. 


Parole chiave associate: nessuna. 
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STEP 
(Si consulti FOR). 
STOP 
STOP 


10 FORn=1 TO 30:PRINT n:NEXT 
20 STOP 

30 FOR n=31 TO 60:PRINT n:NEXT 
run 

cont 


COMANDO: Blocca l’esecuzione di un programma, ma lascia BASIC in uno stato in cui 


il programma può essere riattivato mediante il comando CONT. STOP può essere 
utilizzato per interrompere il programma in punti particolari durante un’operazione di 
debugging. 


Parole chiave associate: CONT, END. 
STR$ 


STR$(<espressione numerica>) 


10 a=&FF :REM 255 esadecimale 
20 b=&X1111 :REM 15 binario 
30 c$="***” 

40 PRINT c$+STR$(a+b)+c$ 

run 

Fedde 270 Fk 


FUNZIONE: Converte l’<espressione numerica> in una rappresentazione decimale di 
stringa. 


Parole chiave associate: BIN$, DEC$, HEX$, VAL. 
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STRING$ 
STRING$(<lunghezza>,<indicatore di carattere>) 


PRINT STRING$(40,”*”) 


LELLA ZZZZZLEZZZZZZZZZZZZZZAZZZZZZZZZZLEZ E ki 


FUNZIONE: Restituisce una espressione di stringa formata dal carattere specificato 
ripetuto il numero di volte (compreso tra 0 e 255) specificato in <lunghezza>. Si noti che 
l’esempio precedente avrebbe anche potuto essere scritto come: 


PRINT STRING$(40,42) 


LLLLELELZLLALALLAZZALZZEZZZZZZALZZZZZZZZLAZZELI 


dove l' <indicatore di carattere> 42 si riferisce al valore ASCII del carattere *, risultando 
così equivalente a PRINT STRING$(40,CHR$(42)). 


Parole chiave associate: SPACES. 


SWAP 

(Si consulti WINDOW SWAP). 

SYMBOL 

SYMBOL <numero carattere>,<lista di:<riga> 


10 MODE 1:SYMBOL AFTER 105 

20 riga1=255:REM 11111111 binario 

30 riga2=129:REM 10000001 binario 

40 riga3=189:REM 10111101 binario 

50 riga4=153:REM 10011001 binario 

60 riga5=153:REM 10011001 binario 

70 riga6=189:REM 10111101 binario 

80 riga7=129:REM 10000001 binario 

90 riga8=255:REM 11111111 binario 

100 PRINT “La linea 110 ridefinisce la lettera i (105). 
Batti alcune i e vedrai! Quindi lista il programma.” 
110 SYMBOL 105, riga1,riga2,riga3,riga4,riga5,riga6,riga7,riga8 
run 


COMANDO: Ridefinisce la forma di un carattere sullo schermo. Ciascun parametro deve 
contenere un intero compreso tra 0 e 255. 
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Per allocare spazio nella memoria del CPC6128 per un carattere definito mediante questo 
comando è necessario innanzitutto preparare il computer: 


SYMBOL AFTER x 


dove x è uguale o minore del numero del carattere che si desidera ridefinire. 


Viene quindi inviato il comando SYMBOL, seguito innanzitutto dal numero di carattere 
x. 


Anche se il valore di x specifica un carattere non direttamente presente su tastiera, il 
carattere ridefinito può essere stampato sullo schermo mediante il comando: 


PRINT CHR$(x) 


Dopo SYMBOL x sono presenti 8 parametri che specificano le 8 singole righe compo- 
nenti il carattere, a partire dalla riga più in alto. Ciascun parametro deve essere compreso 
tra0 e 255. La rappresentazione binaria di ciascuno degli 8 parametri determina lo schema 
di quella particolare riga nel carattere finito. 

Se, ad esempio, il primo degli 8 parametri è 1, la riga in alto del carattere avrà 
rappresentazione binaria 00000001. Dove compare 1, la sezione del carattere viene 
stampata nel colore della PENna; dove compare 0, la sezione del carattere non è visibile 
perchè viene stampata nel colore della carta. Di conseguenza la prima riga di questo 
nuovo carattere avrà un punto nell’angolo superiore destro. Proseguendo questo esempio, 
si specificheranno gli altri 7 parametri come 3,7,15,31,63,0,0; la loro rappresentazione 
binaria completa sarà: 


parametro(riga)1: 00000001 binario: (decimale 1) 
parametro(riga)2: 00000011 binario: (decimale 3) 
parametro(riga)3: 00000111 binario: (decimale 7) 
parametro(riga)4: 00001111 binario: (decimale 15) 
parametro(riga)5: 00011111 binario: (decimale 31) 
parametro(riga)6: 00111111 binario: (decimale 63) 
parametro(riga)7: 00000000 binario: (decimale 0) 
parametro(riga)8: 00000000 binario: (decimale 0) 


Osservando la rappresentazione binaria dei precedenti 8 parametri, dovrebbe essere 


possibile vedere la forma del nuovo carattere. Si assegnino questi parametri al carattere 
numero 255 mediante il comando: 


SYMBOL 255,1,3,7,15,31,63,0,0 
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Si noti che il valore O relativo agli ultimi due parametri significa che è sufficiente digitare: 
SYMBOL 255,1,3,7,15,31,63 


Si noti inoltre che è possibile introdurre i parametri in binario, per evitare di dover 
convertire la “rappresentazione” del simbolò creato in forma decimale (si ricordi di usare 
il prefisso &X). Ad esempio: 


SYMBOL255,&X00000001,&X00000011,&X00000111, 
&X00001111,&X00011111,&X00111111 


Per visualizzare il carattere: 
PRINT CHR$(255) 


Assegnando i parametri precedenti ad un carattere di tastiera, si otterrebbe il nuovo 
carattere ad ogni pressione del tasto relativo, oppure in ogni punto in cui avrebbe dovuto 
comparire il carattere precedente. Inoltre, BASIC non rifiuterebbe il nuovo carattere 
come incomprensibile, ma lo considererebbe come equivalente al precedente carattere. 


Ulteriori informazioni relative ai caratteri definiti da utente si trovano nella parte 2 del 
capitolo “A vostra disposizione”. 


Parole chiave associate: SYMBOL AFTER. 
SYMBOL AFTER 


SYMBOL AFTER <espressione intera> 


10 CLS 

20 SYMBOL AFTER 115 

30 PRINT “La linea 40 ridefinisce la s “; 

40 SYMBOL 115,0,56,64,64,48,8,8,112 

50 PRINT “in S” 

60 PRINT “Cancella questa definizione di s” 
70 PRINT “digitando: SYMBOL AFTER 240” 
run 


COMANDO: Assegna il numero di caratteri permessi definiti da utente (compresi tra 0 
e 256). Il valore per difetto è 240, e consente 16 caratteri definiti da utente (da 240 a 255). 
Se l’<espressione intera> è 32, tutti i caratteri da 32 a 255 diventano ridefinibili. 
SYMBOL AFTER 256 impedisce la ridefinizione di caratteri. 


Quando viene eseguito un comando SYMBOL AFTER, tutti i caratteri definiti da utente 
vengono riportati alle loro condizioni per difetto. 
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SYMBOL AFTER NON avrà effetto se richiamato DOPO l’alterazione di HIMEM 
mediante il comando MEMORY, oppure mediante l’apertura di un file buffer tramite 
OPENIN o OPENOUT. In tali circostanze verrà restituito un errore(5) “Improper 
argument” (a meno che lo stato precedente fosse SYMBOL AFTER 256). 


Ulteriori informazioni relative ai caratteri definiti da utente si trovano nella parte 2 del 
capitolo “A vostra disposizione”. 


Parole chiave associate: HIMEM, MEMORY, SYMBOL. 
TAB 


(Si consulti PRINT TAB). 
TAG 


TAGI[#<canale>] 


10 INPUT “inserisci il tuo nome”;a$:CLS 

20 PRINT “Sicuramente ti muoverai “;a$ 

30 TAG 

40 x=LEN(a$)*17:y=50+RND*300:MOVE -x,y 
50 FOR f=-x TO 640 STEP RND*7+3 

60 MOVE f,y:PRINT “ “;a$;;:FRAME:NEXT 

70 FOR b=640 TO -x STEP-RND*7+3 

80 MOVE b,y:PRINT a$;” “;;FRAME:NEXT 
90 GOTO 40 

run 


COMANDO: Invia qualsiasi testo specificato nel <canale> alla posizione del cursore 
grafico: in questo modo testo e simboli possono essere inseriti all’interno di grafici, o 
spostati pixel per pixel invece di carattere per carattere. Se viene omesso il <canale>, 
viene assunto per difetto il canale #0. 


L’angolo superiore sinistro del carattere viene accostato al cursore grafico, mentre i 
caratteri di controllo non stampabili (come line feed e ritorno di carrello) verranno 
visualizzati se l’istruzione PRINT non è chiusa da un punto e virgola. 


Nel canale per difetto (#0) BASIC disabilita TAG quando ritorna in modo diretto. 


Parole chiave associate: TAGOFF. 
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TAGOFEF 
TAGOFFI#<canale>] 


10 MODE 2:TAG :REM Testo e grafica attivato 
20 anno=1984:FOR x=1 TO 640 STEP 70 

30 MOVE x,400:DRAWR 0,-350 

40 anno=anno+1:PRINT anno;:NEXT 

50 TAGOFF :REM Testo e grafica DISATTIVATO 
60 LOCATE 34,25:PRINT “Cifre annuali” 

70 GOTO 70 

run 


COMANDO: Disabilita TAG (testo e grafica) per il <canale> specificato (canale #0 se 
non indicato) e ridirige il testo alla posizione precedente del cursore di testo usato prima 
del comando TAG. 

Parole chiave associate: TAG. 

TAN 


TAN(<espressione numerica>) 


PRINT TAN(45) 
1.61977519 


FUNZIONE: Calcola la TANgente dell’<espressione numerica>, che deve essere com- 
presa tra -200000 e +200000. 


Si noti che si possono utilizzare DEG e RAD per ottenere il risultato dell’operazione 
rispettivamente in gradi o in radianti. 


Parole chiave associate: ATN, COS, DEG, RAD, SIN. 
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TEST 
TEST(<coordinata x>,<coordinata y>) 


10 CLS 

20 PRINT “Stai usando il numero di penna”; 
30 PRINT TEST(10,386) 

40 PRINT “Prova a cambiare PEN e MODE”; 
50 PRINT “....quindi riesegui il programma.” 
run i 


FUNZIONE: Porta il cursore grafico alla posizione assoluta specificata dalle coordinate 
x e ye restituisce il valore dell’inchiostro alla nuova locazione. 


Parole chiave associate: MOVE, MOVER, TESTR, XPOS, YPOS. 
TESTR 
TESTR(<spostamento x>,<spostamento y>) 


10 MODE 0:FOR x=1 TO 15:LOCATE 1,x 
20 PEN x:PRINT STRING$(10,143);;NEXT 
30 MOVE 200,400:PEN 1 

40 FOR n=1 TO 23:LOCATE 12,n 

50 PRINT “penna”;TESTR(0,-16):NEXT 
run 


FUNZIONE: Porta il cursore grafico alla posizione specificata dagli spostamenti x e y 
relativi alla sua posizione corrente e restituisce il valore dell’inchiostro alla nuova 
locazione. 


Parole chiave associate: MOVE, MOVER, TEST, XPOS, YPOS. 


THEN 


(Si veda IF). 
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TIME 
TIME 


10 
20 
30 
40 
50 
60 
70 
80 
90 
100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
run 


CLS:REM orologio 
INPUT “ora”;ora 
INPUT “minuto”;minuto 
INPUT “secondo”;secondo 
CLS:dato=INT(TIME/300) 
WHILE ora<13 
WHILE minuto<60 
WHILE tic<60 
tic=(INT(TIME/300)-dato)+secondo 
LOCATE 1,1 
PRINT USING “## “jora,minuto, tic 
WEND 
tic=0:secondo=0:minuto=minuto+1 
GOTO 50 
WEND 
minuto=0:ora=ora+1 
WEND 
ora=1 
GOTO 60 


FUNZIONE: Restituisce il tempo trascorso dall’ultima accensione o dall’ultimo riavvio 
del computer (ad esclusione dei momenti di lettura o scrittura su disco). 


Ogni secondo del tempo reale è uguale al valore restituito: TIME/300. 


Parole chiave associate: AFTER, EVERY. WEND, WHILE. 


TO 


(Si veda F 


OR). 
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TROFF 
TRON 


TROFF 
TRON 


10 TROFF:PRINT:PRINT “TRacciamento OFF” 
20 FORn=1 TO 8 i 

30 PRINT “programma in esecuzione”:NEXT 
40 IF f=1 THEN END 

50 TRON:PRINT:PRINT “TRacciamento ON 
60 f=1:GOTO 20 

run 


COMANDO: Esegue un tracciamento dell’esecuzione di un programma stampando ogni 
numero di linea prima di eseguirlo. Il numero di linea compare tra parentesi quadre []. 


TRON attiva il tracciamento, mentre TROFF lo disattiva. 


Questa funzione risulta particolarmente utile per lo studio delle sequenze di esecuzione 
delle linee di un programma immediatamente prima del verificarsi di un errore. 


Parole chiave associate: nessuna. 
UNT 
UNT(<espressione di indirizzo>) 


PRINT UNT(&FF66) 
-154 


COMANDO: Restituisce un intero compreso tra -32768 e +32767 che rappresenta il 
complemento a due equivalente al valore senza segno dell’<espressione di indirizzo>. 


Parole chiave associate: CINT, FIX, INT, ROUND. 
UPPER$ 
UPPER$(<espressione di stringa>) 


10 CLS:a$="ma quanto sei cresciuta!” 
20 PRINT UPPER$(a$) 
run 


FUNZIONE: Restituisce una nuova espressione di stringa che risulta essere una copia 
dell’<espressione di stringa> specificata in cui tutti i caratteri alfabetici compresi tra A 
e Z vengono convertiti in lettere maiuscole. La funzione risulta utile per utilizzare dati in 
ingresso che possono essere forniti in caratteri maiuscoli o minuscoli. 


Parole chiave associate: LOWER$. 
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USING 


(Si veda PRINT USING). 
VAL 


VAL(<espressione di stringa>) 


10 CLS:PRINT “Conosco le tabelline!” 

20 PRINT:PRINT “Premi un tasto (da 1 a 9)” 
30 a$=INKEY$:IF a$=”" THEN 30 

40 n=VAL(a$):IF n<1 OR n>9 THEN 30 

50 FOR x=1 TO 12 

60 PRINT nyX”,x;7=";n*x 

70 NEXT:GOTO 20 

run 


FUNZIONE: Restituisce il VALore numerico (compresi il segno di negazione e il punto 
decimale) del primo carattere (o dei primi caratteri) nella <espressione di stringa> 
specificata. 


Se il primo carattere non è un numero, viene restituito 0. Se il primo carattere è un segno 
di negazione o un punto decimale seguito da caratteri non numerici, verrà restituito un 
messaggio di errore(13) “Type mismatch”. 


Parole chiave associate: STR$. 
VPOS 


VPOS(#<canale>) 


10 MODE 1:BORDER O:LOCATE 8,2 

20 PRINT “usa i tasti cursore su/giu” 

30 WINDOW 39,39,1,25:CURSOR 1,1 

40 LOCATE 1,13 

50 IF INKEY(0)<>-1 THEN PRINT CHR$(11); 
60 IF INKEY(2)<>-1 THEN PRINT CHR$(10); 
70 LOCATE #1,3,24 

80 PRINT #1,"cursore di testo “; 

90 PRINT #1,"posizione verticale =”; 

100 PRINT #1,VPOS(#0):GOTO 50 

run 


FUNZIONE: Restituisce la corrente posizione verticale del cursore di testo in relazione 
all’estremità superiore della finestra di testo. Il <canale > DEVE essere specificata e NON 
assume il valore #0 per difetto. 


Parole chiave associate: POS, WINDOW. 
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WAIT 
WAIT <numero porta>,<maschera>[,<inversione>] 
WAIT &FF34,20,25 


COMANDO: Attende finchè il <numero porta> di I/O specificato non restituisce un 
particolare valore compreso tra 0 e 255. BASIC resta in ciclo durante la lettura della porta 
di I/O. Il valore letto viene sottoposto ad un’operazione di OR esclusivo con 
l’<inversione> e quindi ad un’operazione di AND con la <maschera> finchè non si 
ottiene un risultato diverso da zero. 


BASIC attenderà indefinitamente fino al verificarsi della condizione richiesta. 
Non è un comando da utilizzare con leggerezza. 
Parole chiave associate: INP, OUT. 
WEND 
WEND 
WEND 


COMANDO: Segnala la fine del corpo di un programma che deve essere eseguito 
all’interno di un ciclo WHILE. WEND seleziona automaticamente il comando WHILE 
cui deve essere associato. 


Parole chiave associate: TIME, WHILE. 
WHILE 


WHILE <espressione logica> 


10 CLS:PRINT “Dieci secondi di timer”:t=TIME 
20 WHILE TIME<t+3000 

30 SOUND 1,0,100,15 

40 WEND:SOUND 129,40,30,15 

run 


COMANDO: Esegue ripetutamente il corpo di un programma mentre una data condi- 
zione risulta vera. Il comando WHILE definisce l’inizio del ciclo e specifica la condizione 
nell’<espressione logica>. 


Parole chiave associate: TIME, WEND. 
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WIDTH 


WIDTH <espressione intera> 
WIDTH 40 


COMANDO: Indica a BASIC quanti caratteri per linea devono essere stampati quando 
si collega una stampante. BASIC invierà quindi i caratteri di ritorno carrello o line feed 
quando necessario. 


Il computer assume un valore per difetto di 132, a meno che non venga specificato un 
comando WIDTH. 


Il comando WIDTH 255 elimina ii caratteri di ritorno carrello e line feed, permettendo alle 
linee di stampa di essere “spezzate” dalla stampante. Si noti che i caratteri di ritorno 
carrello e line feed verranno comunque generati da comandi PRINTnon chiusi da un 
punto e virgola o da una virgola. 


Parole chiave associate: POS. 


WINDOW 
WINDOW#<canale>,]<sinistra>,<destra>,<alto>,<basso> 


10 MODE 0:BORDER 0:REM carta di prova 
20 INK 0,0:INK 1,25:INK 2,23:INK 3,21 
30 INK 4,17:INK 5,6:INK 6,2:INK 7,26 

40 PAPER O:CLS 

50 PAPER 1:WINDOW 2,4,1,18:CLS 

60 PAPER 2:WINDOW 5,7,1,18:CLS 

70 PAPER 3:WINDOW 8,10,1,18:CLS 
80 PAPER 4:WINDOW 11,13,1,18:CLS 
90 PAPER 5:WINDOW 14,16,1,18:CLS 
100 PAPER 6:WINDOW 17,19,1,18:CLS 
110 PAPER 7:WINDOW 2,19,19,25:CLS 
120 GOTO 120 

run 


COMANDO: Specifica le dimensioni di un canale del testo (WINDOW - finestra) sullo 
schermo. I valori dei parametri <sinistra>, <destra>, <alto> e <basso> dovrebbero 
corrispondere alle posizioni interne dei caratteri di schermo compatibilmente con il modo 
di schermo in uso. 


Se il <canale> non è specificato, BASIC assume come valore per difetto il flusso #0. 


Ulteriori informazioni relative alle finestre si trovano nella parte 2 del capitolo “A vostra 
disposizione”. 


Parole chiave associate: WINDOW SWAP. 
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WINDOW SWAP 
WINDOW SWAP <canale>,<canale> 


10 MODE 1:INK 1,24:INK 2,9:INK 3,6 
20 WINDOW 21,40,13,25:PAPER 3 

30 WINDOW #1,1,20,1,12:PAPER #1,2 
40 CLS:PRINT “ finestra numero 0” 

50 CLS #1:PRINT #1,” finestra numero 1" 
60 LOCATE 1,6 

70 PRINT “ finestra rossa (0)”;SPC(2) 
80 LOCATE #1,1,6 

90 PRINT “ finestra verde (1)” 

100 FOR t=1 TO 1000:NEXT 

110 WINDOW SWAP 0,1:GOTO 60 
run 


COMANDO: Scambia la finestra di testo specificata nel primo <canale> con quella 
specificata nel secondo <canale>. 


Devono essere specificate entrambi i <canali>, e in questo caso NON devono essere 
precedute da un direttore di flusso #. 


Il comando può essere utilizzato per ridirigere i messaggi prodotti da BASIC, che in 
genere vengono inviati al canale #0. 


Ulteriori informazioni relative alle finestre si trovano nella parte 2 del capitolo “A vostra 
disposizione”. 


Parole chiave associate: WINDOW. 
WRITE 


WRITE [#<canale>,][<lista scrittura>] 


10 REMsscrive variabili su disco 

20 INPUT “dammi una variabile numerica”;a 

30 INPUT “dammi una variabile di stringa”;a$ 

40 OPENOUT “filedati” 

50 WRITE #9,a,a$ 

60 CLOSEOUT:PRINT “i dati sono memorizzati su disco” 
run 


COMANDO: Scrive i valori degli elementi della <lista scrittura> sul canale specificato 
nell’espressione <canale>. Gli elementi scritti vengono separati da virgole; le stringhe 
sono inserite tra doppi apici. 
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In questo esempio i valori delle variabili inserite vengono scritti sul canale #9 (il canale 
di disco). 


Perrichiamare i valori di queste variabili dal disco è necessario usare un programma come 
il seguente: 


10 REM recupera variabili da disco 
20 OPENIN “filedati”:INPUT #9,a,a$ 
30 CLOSEIN:PRINT “| 2 valori sono:” 
40 PRINT:PRINT a,a$ 

run 


Parole chiave associate: INPUT, LINE INPUT. 


XOR 


<argomento> XOR <argomento> 


IF “alan"<"bob" XOR “gatto”>"cane” THEN PRINT “corretto” ELSE PRINT “sbagliato” 
sbagliato 


IF “bob”<"alan" XOR “cane”>"gatto” THEN PRINT “corretto” ELSE PRINT “sbagliato” 
sbagliato 


IF “alan”<"bob" XOR “cane”>"gatto”" THEN PRINT “corretto” ELSE PRINT “sbagliato” 
corretto 


PRINT 1 XOR 1 
0 

PRINT 0 XOR 0 
0 

PRINT 1 XOR 0 
1 


OPERATORE: Esegue operazioni booleane bit a bit su interi. Il risultato è 1 a meno che 
gli argomenti siano uguali (O esclusivo). 


Ulteriori informazioni relative alla logica si trovano nella parte 2 del capitolo “A vostra 
disposizione...”. 


Parole chiave associate: AND, OR, NOT. 
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XPOS 
XPOS 


10 MODE 1:DRAW 320,200 

20 PRINT “POSizione X cursore grafico=”; 
30 PRINT XPOS 

run 


FUNZIONE: Restituisce la corrente POSizione orizzontale (X) del cursore grafico. 
Parole chiave associate: MOVE, MOVER, ORIGIN, YPOS. 
YPOS 


10 MODE 1:DRAW 320,200 
20 PRINT “POSizione Y cursore grafico=”; 
30 PRINT YPOS 
run 
FUNZIONE: Restituisce la corrente POSizione verticale (Y) del cursore grafico. 


Parole chiave associate: MOVE, MOVER, ORIGIN, XPOS. 
ZONE 
ZONE <espressione intera> 


10 CLS:FOR z=2 TO 20 

20 ZONE z 

30 PRINT “X”,"ZONA X =";z:NEXT 
run 


COMANDO: Modifica le dimensioni della zona di stampa (specificata nelle istruzioni 
PRINT mediante una virgola tra gli elementi). Il valore per difetto della zona di stampa 
è di 13 colonne, ma può essere modificata come indicato nella <espressione intera>, che 
deve essere compresa tra 1 e 255. 


Parole chiave associate: PRINT. 
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Capitolo 4 
Uso di dischi e cassette 


Parte 1: I dischi 


Come usare i dischi 


Questo paragrafo indica come usare i dischi ed introduce alcune carat- 
teristiche di CP/M e i programmi di utilità. 


Argomenti trattati: 


* Come effettuare copie di riserva dei dischi originali 

* Come iniziare l'esecuzione di CP/M Plus 

* Come usare i file di aiuto (Help) 

* Operazioni su drive singoli e multipli 

* Copia di file con PIP 

* Operazioni con i dischi di dati di BASIC 

* Come installare una applicazione CP/M Plus ad avvio automatico 
* Uso di GSX 

* Come utilizzare CP/M 2.2 


La parte 7 del corso Fondamenti ha descritto come formattare un disco di sistema vergine 
che può essere usato con BASIC e i giochi oltre che con CP/M. 


La parte 10 del corso Fondamenti ha descritto come fare copie dei dischi usando il 
programma DISCKIT9 (sul lato 1 dei dischi di sistema). 


Questo paragrafo considera come usare i dischi a seconda dei programmi che si 
vogliono memorizzare. 
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Copie di riserva dei dischi originali 


E’ molto importante fare copie di riserva dei dischi originali di sistema forniti con il 
computer e poi tenere gli originali in un luogo sicuro: è infatti molto costoso sostituirli 
se danneggiati! Si ricorda che ogni disco fornito ha due facce e quindi i dischi di sistema 
hanno in totale quattro lati. Ogni disco ha infatti due lati entrambi utilizzabili. 


Il Side 1 (lato 1) è molto importante: contiene la copia originale del CP/M Plus ed un 
insieme di programmi di utilità per la gestione dei dischi. Il Side 2 (lato 2) contiene file 
per i programmatori in assembler e il Side 3 (lato 3) contiene Dr. LOGO, i file di aiuto 
(Help), e GSX. Il Side 4 (lato 4) contiene CP/M 2.2 e Dr. LOGO disponibile per i modelli 
AMSTRAD CPC664 e CPC464+DDI 1; questi programmi vengono forniti per ragioni di 
compatibilità, ovvero solo nel caso si necessiti di loro. Di solito non vengono usati. 


Occorre pensare alle copie dei dischi originali come ad una ‘libreria’ di programmi. Di 
solito, si selezionerà il programma desiderato, invece di copiare il programma su un 
disco vuoto per poi eseguirlo da lì, inserendo il ‘disco di libreria’ sul quale questo è 
memorizzato. 


Ancora una volta occorre ricordare che i ‘dischi di libreria” che si usano DEVONO 
ESSERE COPIE, fatte dai dischi originali forniti con il computer. 


Si ricorda inoltre che se si sta usando in fase di copia un disco vergine come destinazione, 
il programma DISCKIT 3 (sul lato 1) lo formatterà in tale fase. 


Iniziamo ad usare CP/M Plus 


Si è soliti vedere, quando si accende il CPC6128, il BASIC AMSTRAD. 
Questo resterà in memoria fino a quando non viene sostituito da un programma BINario 
eseguito da AMSDOS (o cassetta) o caricando CP/M Plus mediante il comando |CPM. 


Una volta caricato CP/M Plus il CPC6128 non farà più accesso al lato 1 del disco; ameno 
che, naturalmente, non si voglia eseguire un programma di utilità contenuto in esso. Solo 
i dischi ad avvio automatico devono essere dischi di sistema (System); tutti gli altri 
possono essere dischi di dati (Data) che hanno una capacità di memorizzazione 
maggiore. 


Eseguire un programma consiste semplicemente nell’inserire il disco contenente il 
programma e scriverne il nome. I dati usati da un programma possono essere salvati sia 
sul disco contenente il programma sia su un altro. CP/M Plus permette, così come 
AMSDOS, di cambiare il disco. Se alcuni programmi, contenenti alcune utilità, devono 
essere per comodità presenti sul disco, si usi il programma PIP sul lato 1 per copiarli 
come descritto in questo capitolo e nel Capitolo 5. 
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Come tenere il file PROFILE! 


Il disco di sistema fornisce un file speciale, il cui nome è PROFILE.SUB., che contiene 
una lista di comandi che devono essere eseguiti automaticamente quando viene caricato 
CP/M Plus. E’ possibile, quindi, (se non lo si è già fatto) inserire una COPIA del lato 1 
(Side 1) dei dischi di sistema e scrivere al prompt A>: 


REN PROFILE.SUB=PROFILE.ENG 


...Che creerà il file PROFILE.SUB dal PROFILE.ENG. Questo file, che verrà eseguito 
al prossimo caricamento di CP/M Plus, contiene i comandi: 


SETKEYSKEYS.CCP 
LANGUAGE 3 


...per far sì che i tasti cursore siano disponibili nella scrittura dei comandi CP/M, e per 
convertire l’output su schermo in caratteri inglesi (da quelli americani), in modo che 
premendo [SHIFT]3 si visualizzi il segno ‘£’. 


Quando la tastiera è stata fissata com il comando SETKEYS KEYS.CCP le linee di 
comando CP/M possono essere editate nello stesso modo di quelle BASIC. Per ulteriori 
dettagli si consulti la parte 2 del Capitolo 5. 


Un aiuto 


Il lato 3 (Side 3) dei dischi di sistema contiene un programma speciale il cui nome è 
‘Help’.il quale è stato progettato per essere un manuale di istruzione elettronico dei 
programmi di utilità di CP/M Plus. Per attivare questa funzione, si inserisca il lato 3 (Side 
3) ed al prompt A>, si scriva: 


HELP 


...ed il programma ‘Help’ sarà disponibile per ulteriori domande, guidando l’utente 
nell’informazione richiesta. 


Un drive o due? 


Quando viene inizialmente caricato CP/M Plus, questo scopre il numero di drive 
connessi. Questo numero viene visualizzato in uno dei messaggi iniziali. Si noti che 
questo processo può essere eluso se il secondo drive ha un disco inserito parzialmente. 


Tutti i messaggi di errore relativi ai dischi vengono visualizzati nella venticinquesima 
linea dello schermo. I programmi stessi usano solo ventiquattro linee. 
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Quando si ha solo un drive, la linea finale visualizza anche il messaggio ‘Drive is A? o 
‘Drive is B:’. Questo perchè CP/M Plus permette di lavorare con un meccanismo fisico 
come se se ne avessero due. Si avranno due dischi da alternare e la linea finale dello 
schermo indicherà quando inserire i dischi a seconda delle richieste del programma. 
Questo metodo permette di non acquistare il secondo drive ma richiede spesso di 
cambiare i dischi: ciò è una perdita di tempo e induce alla possibilità di errori umani. 


Copia di file da un disco in un altro 


Il programma di utilità PIP (Peripheral Interchange Program) viene fornito per copiare 
i file da un disco in un altro. 


Prima di tutto occorre caricare PIP dal lato 1 (Side 1), scrivendo, al prompt A>: 

PIP 

...il prompt * indicherà che PIP è stato correttamente caricato. Di solito si copieranno i 
file dal disco origine (Source) (nel Drive A:) in quello di destinazione (Destination) (nel 
Drive B:). Abbiamo già visto questo processo su un sistema a singolo drive; il Drive A: 
e il Drive B: coincidevano (erano cioè lo stesso meccanismo). 

Per copiare un file, ad esempio SUBMIT.COM, dopo il prompt * si scriva: 
B:=A:SUBMIT.COM 

Per copiare tutti i file dal disco origine in quello destinazione si usa il comando: 
Bis 

Per uscire da PIP, al prompt *, si preme [RETURN]. 


PIP è un programma molto sofisticato; ulteriori dettagli sul suo uso sono descritti nel 
Capitolo 5. 


Dischi di dati di BASIC 


Come appena descritto un disco di sistema (System) viene usato di solito solo come disco 
di avvio CP/M. I dischi usati per BASIC possono essere del resto solo di dati (Data-Only) 
i quali hanno una capacità di memorizzazione maggiore. 


Tale disco deve essere formattato usando il programma DISKIT83. Per copiare i 
programmi su questo tipo di disco occorre usare PIP (caricato dal lato 1 (Side 1)) oppure 
usare i comandi LOAD e SAVE da BASIC. 
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Dischi BASIC ad avvio automatico 


Se si acquista un programma applicativo scritto in BASIC AMSTRAD per il CPC6128 
questo dovrebbe essere eseguito automaticamente all’accensione del computer. Come 
con i dischi di sistema originali forniti con il CPC6128 anche con questi occorre 
mantenere gli originali al sicuro ed usare le copie. 


Dischi CP/M ad avvio automatico 


Il sistema operativo CP/M permette di caricare ed eseguire una enorme libreria software 
scritta per i personal computer che usano CP/M. La ‘logica’ fondamentale di tali 
programmi è stata già disposta: tutto ciò che è richiesto per usarli sul 6128 è di porli in 
un disco disponibile e forse di informarli di un metodo particolare che il 6128 usa per 
far riferimento allo schermo. 


Un insieme di programmi di un disco progettato per eseguire una specifica applicazione 
è detto ‘pacchetto’. Questi pacchetti sono, di solito, progettati per operare su una vasta 
gamma di computer, ognuno dei quali ha una propria dimensione di schermo ed un 
proprio modo di spostare il cursore. 


Il 6128, quando esegue programmi di CP/M Plus, ha un ‘emulatore di terminale’ e le 
caratteristiche sono diverse dai codici di controllo del BASIC. 


A volte, i pacchetti acquistati sono già stati ‘installati’ per i sistemi AMSTRAD, oppure 
è stata predisposta una installazione compatibile con il 6128. Si seguano semplicemente, 
se disponibili, le istruzioni fornite con il software per un protocollo Zenith Z19/Z29. Se 
il pacchetto non ha incluso tale protocollo nè ha delle specifiche riguardanti AMSTRAD, 
si consulti il paragrafo ‘Configurazione di un programma CP/M’ che indica alcuni 
comandi che possono essere inviati al 6128 per produrre gli effetti che il pacchetto 
richiede. Di solito la procedura di installazione richiede la scrittura di codici quando 
richiesti. Si seguano quindi le istruzioni fornite con il pacchetto. 


Il software acquistato deve essere fornito su un disco usabile dal sistema. I computer 
usano diversi tipi di dischi: possono avere la stessa dimensione ma ciò non significa 
necessariamente che siano compatibili fra loro. Si richieda al proprio fornitore la 
versione AMSTRAD 3. 
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Come creare un disco CP/M ad avvio automatico 


Come per i programmi applicativi stessi è spesso utile avere le utilità SETKEYS.COM 
e SUBMIT.COM (con iloro file di istruzione associati) su un disco ad avvio automatico. 


Per trasferire i file .COM e i file di istruzione di SUBMIT è possibile usare PIP. In 
quest’ultimo modo PIP è effettivamente un editor linea a linea. Il file LOGO3.SUB, ad 
esempio, sul lato 3 (Side 3) potrebbe esere stato creato usando i seguenti comandi: 


(Inserire il disco di sistema, Side 1 nel Drive A?). Si scriva: 
PIP 
(Togliere il disco di sistema ed inserire il disco destinazione). Si scriva: 


LOGO3.SUB=CON: 
SETKEYSKEYS.DRL 
[CONTROL]J LOGO3 
[CONTROLI]Z 


Configurazione di un programma CP/M 


Il CPC6128 ha una ampia gamma di codici di controllo disponibili per installare il 
pacchetto software in modo sia eseguibile con CP/M. Molti processi sui dati e molti 
pacchetti richiedono la visualizzazione di messaggi e l’input in qualsiasi punto dello 
schermo, la comprensione di codici di controllo. 


Il pacchetto che si possiede è già stato configurato per il sistema AMSTRAD, non 
occorre quindi fare nessuna operazione di installazione. 


Configurazione dell’output da un pacchetto 


La procedura di installazione di un pacchetto consiste di solito nell'esecuzione di un 
programma speciale (spesso chiamato INSTAL) che fa diverse domande inerenti i 
parametri dello schermo del CPC6128. Le risposte devono essere rilevate dalla tabella 
che segue che è una sintesi del Capitolo 7 parte 15. 
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Codici di 
controllo —Esadecimale —Decimale Operazione 


[BEL] &07 7 Emette un suono 

[BS] &08 8 Sposta il cursore indietro di una posizione 
[LF] &OA 10 Sposta il cursore in giù di una linea 

[CR] &OD 13 Sposta il cursore nell’angolo a sinistra di una 


finestra sulla linea attuale 

[ESC]A &1B &4l 27 65 Sposta il cursore in sù di una linea 

[ESC]C &1B &43 27 67 Sposta il cursore in avanti di una posizione 

[ESC]E &1B &45 27 69 Pulisce lo schermo 

[ESC]H &1B &48 27 72 Cursore nell’angolo in alto a sinistra dello 
schermo 

[ESC]J &1B &4A 27 74 Pulisce lo schermo dalla posizione attuale del 
cursore fino alla fine dello schermo 

[ESC]K &1B &4B 27 75 Pulisce lo schermo dalla posizione attuale del 
cursore fino all’angolo in alto a destra 

[ESC]L &1B &4C 27 76 Inserisce una linea 

[ESC]M &1B &4D 27171 Cancella una linea 

[ESC]N &1B &4E 27 78 Cancella un carattere nella posizione attuale 
dello schermo 

[ESC]Y &1B &59 27 89 

<C> <r> <c><r> Sposta il cursore sullo schermo nella 

posizione indicata. <c> è la colonna + 32, <r> 
è la riga + 32 

[ESC]d &1B &64 27 100 Pulisce lo schermo dalla posizione del 
cursore inclusa fino alla fine 

[ESC]o &1B &6F 27 111 Pulisce lo schermo dall’angolo in alto a 
sinistra fino alla posizione del cursore inclusa 

[ESC]p &1B &70 27 112 Entra in modalità video inverso 

[ESC]q &1B &71 27 113 Esce dalla modalità video inverso 


Configurazione dell’input da un pacchetto 


I programmi del pacchetto si attenderanno di poter richiedere informazioni alla tastiera. 
Molti dei tasti della tastiera del 6128 restituiscono valori standard ad eccezione dei tasti 
cursore. E’ possibile usare l’utilità SETKEYS per ridefinire questi codici prodotti dalla 
tastiera sebbene, dove è possibile, è preferibile per ogni pacchetto essere configurato per 
accettare valori standard. 


Sfortunatamente non vi è una regola generale tra i vari software nell’uso delle parole 
chiave. I caratteri ‘spazio’, [TAB] e [RETURN] sono praticamente universali ma il tasto 
‘backspace’ è spesso diverso! Si provi, ad esempio, a confrontare i diversi codici di 
controllo relativi all’operazione ‘sposta il cursore all’inizio della linea”: 

in CP/M :[CONTROL]B 

in Dr. LOGO: [CONTROL]JA 

e nei word processor standard: [CONTROL]Q S 
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Sono forniti come standard tre utili insiemi di codici. Ogni configurazione può essere 
richiamata dal file contenuto nel lato 1 (Side 1) dei dischi di sistema: 


SETKEYSKEYS.CCP 


... già descritto come uno dei comandi eseguito automaticamente da PROFILE.SUB che 
fissa la tastiera in modo possa usare i comandi CP/M. 


Esecuzione di un pacchetto ad avvio automatico di CP/M 


Di solito tutto ciò che è richiesto è di scrivere il nome del programma principale del 
pacchetto al prompt A>. Per eseguire ad esempio il programma PAYROLL.COM, si 
scrive semplicemente:. 


PAYROLL 


Se è richiesta una qualsiasi configurazione verrà forse fornito un file SUBmit. Un 
esempio è il file LOGO3.SUB sul lato 3 (Side3). Ciò può essere richiamato con il 
comando: 

SUBMIT LOGO3 

Il contenuto del file può essere visto scrivendo: 


TYPELOGO3.SUB 


...che visualizza: 


SETKEYSKEYS.DRL ...per riassegnare la tastiera 
LOGO3 ...per eseguire il programma Dr.LOGO 
SETKEYSKEYS.CCP ...per ripristinare la tastiera. 


Avvio automatico di una pacchetto CP/M 


E° possibile modificare il sistema operativo CP/M in modo che esegua automaticamente 
un programma particolare all’inizio del disco di sistema. E’ possibile ottenere ciò in- 
cludendo il nome del programma alla fine del file PROFILE.SUB di quel disco. 
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Uso di GSX 


GSX è l’abbreviazione di Graphics System eXtension il quale permette di visualizzare 
l’output grafico di un programma CP/M nello stesso modo accurato del testo. E’ usato 
per disegnare linee, diagrammi a torte e scrivere intestazioni particolari con stili e 
dimensioni diverse. Nella pagina seguente c’è un esempio di questa caratteristica. GSX 
permette di inviare l’output allo schermo, alla stampante o ad un plotter. 


GSX stesso non è in grado di disegnare; occorre in tal caso un programma applicativo 
dedicato. L'esempio è stato disegnato utilizzando il programma ‘DR Graph’ della 
Digital Research. Quello che GSX fa, comunque, è di fornire delle caratteristiche 
standard per gli schermi, le stampanti e i plotter, in modo che i programmi applicativi 
possano essere spostati da una macchina all’altra con un minimo di reinstallazione. 


Per creare un disco disponibile in fase di esecuzione di GSX, si copino, usando PIP, (dal 
lato 3) i file GSX.SYS, ASSIGN.SYS e il driver richiesto (oltre al programma 
applicativo stesso) su un disco formattato. Il file ASSIGN.SYS contiene una ‘formula’ 
di tre dispositivi di output, in ordine inverso rispetto alla loro dimensione: 


21a:ddfxlr7 stampante Epson a 7 bit 
11a:ddhp7470 . ;plotter 

01a:ddmode2 ;schermo in modalità 2 
02a:ddmode1 ;schermo in modalità 1 
03a:ddmode0 ;schermo in modalità 3 


I numeri indicano a GSX di quale driver si tratta (Stampante/plotter/schermo). E’ 
possibile caricare nella stessa area di memoria un dispositivo per volta; per questo 
motivo GSX vuole sapere prima di tutto la larghezza di questo per poter allocare uno 
spazio sufficiente. 


Viene fornita una scelta di drivers per le diverse modalità di schermo del 6128 e per le 
stampanti standard. Il file DRIVERS.GSX contiene un riassunto di quelli forniti con il 
6128. E’ possibile leggere tale file inserendo il lato 3 (Side 3) e, dopo il prompt A>, 
scrivere: 


TYPE DRIVERS.GSX 
...per selezionare il dispositivo. 


Molti programmi applicativi includeranno un caricatore automatico di GSX, quindi tutto 
quello che occorre fare è inserire il nome del programma al prompt A>. Se l’applicazione 
che si possiede non ha tale caratteristica, si copi il file GENGRAF.COM (dal lato 3) nel 
disco di lavoro di GSX, e si scriva: 


GENGRAF YOURFILE 


...dove YOURFILE.COM è l’applicazione non installata. Il file GENGRAF.COM può 
essere ora cancellato (mediante comando ERA) poichè YOURFILE.COM include ora 
il caricamento di GSX. 
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Test Diagram 
Ken's wages in pence 


100.00 fill 1 


190.00 fill 0 
fill 7 150.00 — 


100.00 fill 3 


fill 4 100.00 


fill 5 50.00 


Un esempio di output su stampante di GSX 


Utilizzo di CP/M 2.2 


Contrariamente a CP/M Plus, CP/M 2.2 (che è la versione precedente) è molto rigoroso 
riguardo la modifica dei dischi, e spesso richiede di ricaricare parti di sistema operativo 
dal Disco di Sistema nel Drive A: soprattutto dopo l’esecuzione di un programma. E’ del 
resto normale usare dischi di sistema. Se non si possiede un doppio drive si deve usare, 
invece di PIP, il file di copia FILECOPY. 


L’unica raccomandazione è quella di usare CP/M 2.2 se si possiede software per i 
modelli AMSTRAD CPC664 o CPC464+DDI!, il cui software non è in qualche modo 
compatibile con CP/M Plus. 


Attenzione: Alcune applicazioni software CP/M 2.2 per CPC664/CPC464+DDI1 
contengono specifiche istruzioni di installazione che non opereranno con CP/M 
Plus. In questi casi è necessario usare il CP/M 2.2 contenuto nel lato 4 (Side 4) del 
pacchetto di sistema operativo. 
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Parte 2: Cassette 


Se si vuole collegare un registratore a cassette al sistema, come descritto precedente- 
mente, vi sono un certo numero di comandi che operano in modo diverso (se si dice al 


computer di utilizzare la cassetta mediante il comando |TAPE). Appariranno sullo 
schermo molti messaggi e prompt che non si saranno mai incontrati utilizzando i dischi. 


NOTA: Se l’avanzamento ed il riavvolgimento veloci del registratore operano da 
telecomando, sarà necessario sfilare la spina REM del telecomando dall’apparecchio o 
scrivere alla tastiera | TAPE:CAT per attivare il motore della cassetta. Premendo [ESC] 
si esce da questa operazione. 


Diversamente dai dischi, i nomi dei file sulle cassette non hanno regole ferree per la loro 
composizione. Devono essere lunghi non più di 16 caratteri e possono contenere spazi e 
segni di punteggiatura. In alcuni casi è anche possibile ometterli. 


L’elenco che segue descrive le differenze nelle operazioni su cassetta di ognuno di questi 
comandi. Le descrizioni complete si trovano nel Capitolo "Parole chiave del BASIC del 
CPC6128 AMSTRAD". 


CAT 
Verrà chiesto: 
Press PLAY then any key: 


... Occorre cioè premere il tasto PLAY sul registratore e poi uno dei tasti del computer. 
Il nastro della cassetta inizierà a girare ed il computer visualizzerà i nomi di tutti i 
programmi trovati. 


Verrà visualizzato il numero di blocchi di ogni file seguito da un carattere che ne specifica 
il tipo: 


$ file BASIC non protetto 
% = file BASIC protetto 

si file ASCII 

& file binario 


Il computer visualizza 


Ok 


... alla fine di ogni riga se il file è stato letto correttamente. Quindi il file avrebbe potuto 
essere caricato in memoria. 


La funzione CAT non modifica il programma attualmente in memoria. 
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Se un file è stato salvato senza alcun nome, CAT visualizza: 

Unnamed file 

CAT termina se si preme [ESC]. 

Errori di lettura 

Se i messaggi appena mostrati non vengono visualizzati o si ottiene il messaggio: 
Read error a ... o ... Read error b 

... può essere accaduto uno dei seguenti fatti: 


1. Il registratore a cassette non è correttamente collegato al computer tramite la presa 
TAPE (si veda la parte 2 del corso introduttivo) 


2. Il controllo di livello (volume) del registratore non è regolato correttamente. 
3. Il nastro è di qualità scadente o il nastro è consumato. 


4. Il nastro è stato sottoposto a campi magnetici prodotti da un altoparlante, un televisore, 
ecc. 


S. Si sta cercando di caricare una cassetta che non contiene software per i computer 
AMSTRAD. 


CHAIN 

CHAIN MERGE 
LOAD 

MERGE 

RUN 


Non è necessario specificare il nome del file se si vuole caricare il primo file che si 
presenterà nella cassetta. Comandi di esempio: 


CHAIN “” 
CHAIN “’,100 
CHAIN MERGE “” 


CHAIN MERGE “’,100 
CHAIN MERGE “’,100,DELETE 30-70 
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LOAD ‘* 


LOAD “’,&1F40 
MERGE “” 
RUN “” Si può ottenere anche tenendo premuto il tasto [CONTROL] e premendo 


il tasto [ENTER]. Da usare per caricare software su cassetta dopo |TAPE. 
Verrà chiesto: 
Press PLAY then any key: 


... Occorre cioè premere il tasto PLAY sul registratore e poi uno qualunquedei tasti del 
computer. Il nastro della cassetta inizierà a girare ed il computer caricherà il file. 


Lo schermo visualizzerà il messaggio: 
Loading <nome del file> block 1 
... tante volte quanti sono i blocchi del file, incrementando il contatore. 


Se il primo carattere del nome del file è ! questo messaggio non verrà stampato e non verrà 
richiesto di premere un tasto per caricare il file. Occorre anche assicurarsi che il tasto 
PLAY del registratore sia premuto. Se i propri programmi usano il punto esclamativo e 
devono essere eseguiti anche da disco, il ! stesso verrà ignorato durante le operazioni con 
il disco. Il ! non occupa alcuna posizione nei nomi dei file su disco o cassetta. 


Se si abbandona il comando con [ESC] lo schermo presenterà il messaggio di errore: 
Broken in (interrotto) 


Se il file non viene caricato con successo, si veda il paragrafo intitolato “Errori di lettura” 
di questo stesso capitolo. 


ATTENZIONE: L’interfaccia dischi interna occupa una piccola parte di memoria che 
in certi casi era usata da programmi su cassetta concepiti per il CPC464. Tali programmi 
non verranno eseguiti correttamente sul CPC6128 con registratore a cassette. 
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EOF 
POS(#9) 


Queste fuzioni operano sulle cassette esattamente come per i dischi. 


INPUT #9 
LINE INPUT #9 
OPENIN e CLOSEIN 


Non è necessario specificare il nome del file se si vuole utilizzare il primo file presente 
sulla cassetta. Comando di esempio: 


OPENIN “* 


Verrà chiesto: 
Press PLAY then any key: 


... Qccorre cioè premere il tasto PLAY sul registratore e poi uno dei tasti del computer. 
Il nastro della cassetta inizierà a girare ed il computer caricherà i primi 2K del file in una 
porzione di memoria chiamata “buffer del file”. Verrà poi effettuato 1’ INPUT dal buffer 
e quando questo sarà vuoto, il computer chiederà: 


Press PLAY then any key: 
... e caricherà altri 2K bytes dal file. 
Lo schermo visualizzerà il messaggio: 


Loading <nome del file> block 1 
... tante volte quanti sono i blocchi del file, incrementando il contatore. 


Se il primo carattere del nome del file è ! questo messaggio non verrà stampato e non verrà 
richiesto di premere un tasto per caricare il file. Occorre anche assicurarsi che il tasto 
PLAY del registratore sia premuto. Se i propri programmi usano il punto esclamativo e 
devono essere eseguiti anche da disco, il ! stesso verrà ignorato durante le operazioni con 
il disco. Il ! non occupa alcuna posizione nei nomi dei file su disco o cassetta. 


Se si abbandona il comando con [ESC] lo schermo presenterà il messaggio di errore: 
Broken in. (interrotto) 


Se il file non viene caricato con successo, si veda il paragrafo intitolato “Errori di lettura” 
di questo stesso capitolo. 
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LIST #9 

OPENOUT e CLOSEOUT 
PRINT #9 

WRITE #9 


Non è necessario specificare il nome del file se si vuol salvare il file senza nome. 
Comando di esempio: 


OPENOUT “” 
I primi 2K di dati che devono essere salvati su cassetta saranno prima scritti in una parte 


di memoria chiamata “buffer del file”. Quando il buffer sarà pieno verrà visualizzato il 
messaggio: 


Press REC and PLAY then any key: 


.. Occorre cioè premere i tasti REC e PLAY sul registratore e poi uno dei tasti del 
computer. Il nastro della cassetta inizierà a girare ed il computer salverà il contenuto del 
buffer del file. Il computer riempirà poi il buffer del file con i successivi 2K di dati e poi 
chiederà: 


Press REC and PLAY then any key: 


... è salverà altri 2K bytes sul file. 


Se il buffer del file è parzialmente pieno e deve essere eseguito un comando 
CLOSEOUT il computer salverà la parte rimanente del buffer su cassetta, presentando 
il prompt: 

Press REC and PLAY then any key: 


Lo schermo visualizzerà il messaggio: 


Saving <nome del file> block <x> 


Se il primo carattere del nome del file è ! questo messaggio non verrà stampato e non verrà 
richiesto di premere un tasto per salvare il file. Occorre anche assicurarsi che i tasti REC 
e PLAY del registratore siano premuti. Se i propri programmi usano il punto esclamativo 
e devono essere eseguiti anche da disco, il ! stesso verrà ignorato durante le operazioni 
con il disco. Il ! non occupa alcuna posizione nei nomi dei file su disco o cassetta. 


Se si abbandona il comando con [ESC] lo schermo presenterà il messaggio di errore: 


Broken in (interrotto) 
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Salvataggio con successo 


Per assicurarsi che i file vengano salvati correttamente occorre assicurarsi che: 


1. Il registratore a cassette sia correttamente collegato al computer tramite la presa 
TAPE (si veda la parte 2 del corso introduttivo) 


2. Il controllo di livello (volume) di registrazione sia regolato correttamente. 
3. Il nastro sia di buona qualità e non sia C120 (si raccomandano nastri C15). 


4. Il nastro non sia stato sottoposto a campi magnetici prodotti da un altoparlante, un 
televisore, ecc. 


5. Prima di cancellare un programma dalla memoria dopo averlo salvato, si effettui un 
CAT del nastro per assicurarsi che il programma sia stato salvato correttamente. 


6. Si abbia cura del proprio registratore e si puliscano regolarmente le testine del 
registratore. 


SAVE 


Non è necessario specificare il nome del file se si vuol salvare il programma senza nome. 
Comando di esempio: 


SAVE “” 

Verrà visualizzato il messaggio: 

Press REC and PLAY then any key: 

... Occorre cioè premere i tasti REC e PLAY sul registratore e poi uno dei tasti del 
computer. Il nastro della cassetta inizierà a girare ed il computer salverà il programma sul 
nastro 


Lo schermo visualizzerà il messaggio: 


Saving <nome del file> block 1 
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incrementando successivamente il numero dei blocchi impiegati. 

Se il primo carattere del nome del file è ! questo messaggio non verrà stampato e non verrà 
richiesto di premere un tasto per salvare il file. Occorre anche assicurarsi che i tasti REC 
e PLAY del registratore siano premuti. Se i propri programmi usano il punto esclamativo 
e devono essere eseguiti anche da disco, il ! stesso verrà ignorato durante le operazioni 
con il disco. Il ! non occupa alcuna posizione nei nomi dei file su disco o cassetta. 


Se si abbandona il comando con [ESC] lo schermo presenterà il messaggio di errore: 
Broken in (interrotto) 

Si legga il paragrafo intitolato Salvataggio con successo contenuto in questo capitolo. 
SPEED WRITE 


Il comando opera solo su cassetta e può essere utilizzato anche se il computer sta 
attualmente usando i dischi. 


Messaggi di errore 


Si noti che i messaggi di errore 7, 21, 24, 25, 27 e 32 potrebbero essere visualizzati nelle 
operazioni con le cassette. 


Comandi esterni AMSDOS 


Si può scegliere di utilizzare per input ed output la cassetta o il disco, mediante i seguenti 
comandi: 


|TAPE (che può essere suddiviso in |TAPE.IN e [TAPE.OUT) per il nastro 
[DISC (che può essere suddiviso in [DISC.IN e |[DISC.OUT) per il disco 


Tutti i comandi esterni: 


... vengono eseguiti su disco, anche se si sta utilizzando la cassetta. 
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Capitolo 5 
AMSDOS e CP/M 


Parte 1: AMSDOS 


Argomenti trattati: 


* Introduzione a AMSDOS 

* Directory su disco 

* Cambio di disco 

* Nomi di file e tipi di file 

* Intestazioni AMSDOS 

* Nomi di file su sistema a due drive 

* Caratteri Jolly 

* Programma di esempio sull’uso dei comandi AMSDOS 
* Elenco dei comandi AMSDOS 

* Trattamento e copia di file 

* Guida di riferimento dei messaggi di errore 


Introduzione 


AMSDOS estende il BASIC AMSTRAD fornito con il proprio computer fornendo 
diversi comandi esterni che sono identificati dal simbolo | che li precede. 


AMSDOS permette all’utente di cambiare i dischi liberamente sempre che non vi siano 
file in uso; nel qual caso verrà visualizzato un messaggio di errore e vi potrebbe essere 
una perdita di dati se il file aperto era in fase di scrittura. 
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Directory su disco 


Ogni disco è suddiviso in due parti, la directory e l’area dati. La directory contiene una 
lista di tutti i nomi di file ed una “mappa” per il loro reperimento. AMSDOS o CP/M 
possono calcolare la dimensione di un particolare file guardando la directory. Il calcolo 
dello spazio disponibile su disco viene fatto sommando la dimensione di tutti i file e 
guardando quanto spazio resta inutilizzato. 


Quando viene letto un file, viene esaminata la voce nella directory e fornita la locazione 
su disco. Quando viene creato un nuovo file, viene allocato uno spazio libero e quando 
viene cancellato tale spazio viene abbandonato. La directory lavora con unità di 1K e può 
trattare un massimo di 64 voci. I file larghi hanno una voce ogni 16K, sebbene questo 
aspetto sia nascosto all’utente. 


Cambio di dischi 


In AMSDOS (e CP/M Plus) è possibile cambiare disco o rimuoverlo sempre che il drive 
non vi stia accedendo e che nessun file sia aperto per lettura o scrittura. 


Il cambio di disco mentre è in fase di scrittura può danneggiare i dati presenti sul disco. 
Se un disco viene cambiato mentre vi è ancora un file aperto, quando AMSDOS lo scopre 
lo abbandona e produce un messaggio di errore. Qualsiasi dato ancora da scrivere sul 
disco verrà perso e l’ultima voce della directory non verrà scritta. Comunque, AMSDOS 
può scoprire tale cambiamento quando legge la directory e cioè ogni 16K (e quando il file 
viene aperto o chiuso). Così, potenzialmente 16K di dati potrebbero essere danneggiati 
cambiando il disco su cui vi è ancora un file aperto. 


Nomi di file e tipi di file di AMSDOS 


E° pratica comune fornire un nome al file in modo che sia chiaro di che tipo si tratta. Il 
nome NON costringe il computer ad usare il file in un modo particolare, comunque alcuni 
programmi accetteranno un file quando ha un corretto tipo di nome. AMSDOS accetterà 
qualsiasi nome, ma cercherà preferibilmente alcuni tipi di file a meno che non venga 


specificato altrimenti (si veda “Intestazioni AMSDOS” più avanti). 
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Nomi di file 


Il nome del file è costituito da due parti suddivise da un . (punto). La prima parte può essere 
costituita da un massimo di otto caratteri la seconda da tre. Quindi “BROINTIME.DEM”, 
“DISCKIT3.COM” e “DISC.BAS” sono nomi di file legali. 


La seconda parte del nome del file è detta tipo di file. I nomi di file e i tipi possono essere 


composti da lettere e numeri, ma non sono permessi spazi e simboli di punteggiatura. 
Alcuni tipi di file sono: 


.<spazio> Tipo non specificato. Può essere un file di dati creato da un comando 
OPENOUT “nomefile” o un programma BASIC salvato da AMSDOS 
usando il comando SAVE “nomefile”’,A. 


.BAS Un programma BASIC salvato da AMSDOS usando il comando SAVE 
“<nomefile>” o SAVE “<nomefile>,P o SAVE “<nomefile>.BAS”,A. 


.BIN Un programma o una area di memoria salvata da AMSDOS usando SAVE 
“<nomefile>”,B,<parametro binario>. 


.BAK Una vecchia versione di un file dove AMSDOS o un programma di utilità 
ha salvato una nuova versione di un file usando un nome esistente. Ciò 
permette all’utente di rintracciare, se necessario, la versione precedente. 


.COM Un file di comandi. I comandi di utilità di CP/M sono tutti di questo tipo. 


.SUB Un file di istruzioni per il programma CP/M SUBMIT 


Intestazioni di AMSDOS 


AMSDOS salva automaticamente i file con un identificatore di tipo, quindi non è 
necessario specificarne uno a meno che non si voglia tener conto di quelli descritti 
precedentemente. I file di programma BASIC, protetti e non, e i file binari sono salvati 
su disco con una intestazione (header) e quindi il comando AMSDOS: 


LOAD “<nomefile>” 


... può riconoscerli ed agire di conseguenza. Se il comando LOAD di AMSDOS non trova 
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l’intestazione assume che sia un programma ASCII, ad esempio un file di testo. 
Nonostante i contenuti dell’intestazione quando viene richiesto ad AMSDOS di caricare 
un file senza specificare il tipo di file, esso controlla prima un file di tipo: 


.<spazio> 


Se non esiste cerca un file di tipo: 


.BAS 


... ed infine uno di tipo: 
.BIN 


Ciò permette all’utente di abbreviare il nome del file, non è cioè necessario specificare 
il tipo di file ogni volta. 


Un file di dati aperto con il comando OPENOUT e successivamente scritto non avrà 
intestazione e i contenuti dei comandi WRITE, PRINT o LIST di BASIC saranno in 
ASCII, ovvero testo. Il comando OPENIN, nel caso non venga specificato tipo di file, 
cercherà tale file con lo stesso ordine di LOAD. 


Nomi di file su un sistema a due drive 


Su un sistema a due drive, un sistema cioè a cui è stato connesso un drive addizionale, i 
file possono essere esistenti su entrambi i drive. Il computer non guarderà auto- 
maticamente su entrambi i drive; l’utente quindi deve specificare quale vuole usare. E° 


possibile usare il comando |A o |B o |DRIVE (la descrizione completa viene fornita più 
avanti) per selezionare un drive e successivamente usare un normale nome di file o 


alternativamente scegliere un altro drive per difetto specificando A: o B: come prefisso 
del nome del file. Così per esempio: 


|B 
SAVE “PROG.BAS” 
A 


IA 
SAVE “B:PROG.BAS” 


... Salvano il programma sul secondo drive, il Drive B. 
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In modo analogo, è possibile scegliere un altro numero USER (compreso tra 0 e 15: i 
numeri USER permettono di suddividere la directory) specificandolo come prefisso del 
nome del file. Così, per esempio: 


LOAD “15:PROG.BAS” 


salon, 
SAVE “15:PROG.BAS” 


... dovrebbero caricare e salvare il programma nella sezione di disco con numero USER 
15, senza considerare il parametro per difetto USER (si veda il comando |USER). 


E’ infine possibile scegliere entrambi i parametri USER e DRIVE (in quell’ordine) 
specificandoli insieme al prefisso del nome del file, ad esempio: 


RUN “15B:PROG.BAS” 
Caratteri jolly 


Viene spesso richiesto di eseguire alcune operazioni (copia, cancellazione, ecc.) su più 
file. Quando viene richiesto, in una particolare operazione, un nome di file, AMSDOS 
scandisce tutta la directory alla ricerca di quel nome. E’ possibile, comunque (quando il 
comando lo permette) eseguire l’operazione su un gruppo di file dove alcuni caratteri 
all’interno del nome del file “non hanno importanza”. Ciò è mostrato dall’uso del 
carattere ? nella posizione “senza importanza”. Se il blocco vuoto (o quello che resta 
dell’intero blocco) di una qualsiasi parte del nome del file non ha importanza, allora il 
blocco di ? può essere abbreviato dal simbolo *. Così, per esempio, FRED* è una 


Infine l'espressione *.* significa “tutti i file”. 


esempi: 


DIRECTORY CON *. BAS CON FRED?. BAS | CON F*. BA? 


BERT.BAS BERT.BAS 
FREDI.BAS FREDI.BAS FREDI.BAS FREDI.BAS 
FRED2.BAS FRED2.BAS FRED2.BAS FRED2.BAS 


FRED3.BAK FRED3.BAK 
FRED3.BAS FRED3.BAS FRED3.BAS FRED3.BAS 
FINISH.BAS FINISH.BAS FINISH.BAS 
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Esempi dell’uso dei comandi AMSDOS in un program- 
ma 


Per fornire una buona conoscenza dei comandi AMSDOS raccomandiamo di seguire gli 
esempi e leggere i prossimi paragrafi di questo capitolo. NON si scriva o esegua questi 
programmi con uno dei dischi di sistema CP/M originale inseriti. 


Salvataggio di variabili e copia di uno schermo 


Il seguente esempio di programma scrive su disco e vi sarà quindi bisogno di un dischetto 
vuoto (formattato) o di un disco di lavoro inserito per eseguire il programma. Il 
programma disegna la bandiera inglese e salva l’intero schermo su disco. 


10 dumpfile$="flagdump.srn” 

20 MODE 1:BORDER 0 

30 DIM colour(2) 

40 FORi=0 T0 2 

50 READ colour(i): REM ottiene i colori da DATA 

60 INK i,colour(i) 

70 NEXT 

80 ON ERROR GOTO 430 

90 OPENIN “param.dat” ‘testa se il file esiste 

100 CLOSEIN:ON ERROR GOTO 0 

110 IF errnum=32 AND DERR=146 THEN CLS: GOTO 160 ‘ il file non esiste 
120 CURSOR 1:PRINT “Vuoi scrivere sul vecchio file? S/N); 
130 a$=INKEY4:ON INSTR(” SN”,UPPER$(a$)) GOTO 130,150,140: GOTO 
130 

140 PRINT a$:PRINT “Programma abbandonato”:END 

150 PRINT a$:CURSOR 0 

160 OPENOUT “param.dat” 

170 WRITE #9,dumpfile$,1:REM salva il nomefile e il mode 
180 FOR i=0 TO 2 

190 WRITE #9, colour(i): REM salva i colori 

200 NEXT i 

210 CLOSEOUT 

220 CLS 

230 gp=1:GRAPHICS PEN gp:w=125 

240 x=-65:a=240:y=400:b=-150:GOSUB 400 


continua nella prossima pagina 
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250 y=0:b=150:GOSUB 400 

260 x=575:a=-240:y=400:b=-150:GOSUB 400 

270 y=0:b=150:GOSUB 400 

280 gp=2:GRAPHICS PEN gp:w=40*290 a=240:x=-40:y=400:b=-150:GOSUB 
400 

300 x=0:y=0:b=150:GOSUB 400 

310 a=-240:x=640:y=0:b=150:GOSUB 400 

320 x=600:y=400:b=-150:GOSUB 400 

330 ORIGIN 0,0,256,380,0,400:CLG 1 

340 ORIGIN 0,0,0,640,150,250:CLG 1 

350 ORIGIN 0,0,280,352,0,400:CLG 2 

360 ORIGIN 0,0,0,640,168,230:CLG 2 

370 SAVEdumpfile $,b,&C000,&4000 

380 DATA 2,26,6 

390 END 

400 MOVE x,y:DRAWR a,b:DRAWR w,0:DRAWR -a,-b 
410 MOVE x+a/2+w/2,y+b/2:FILL gp 

420 RETURN 

430 errmum=ERR:RESUME NEXT 

run 


Si noti l’uso dei tipi di file .DAT e .SRN. Questi tipi di file sono usati per ricordare il 
contenuto del file. Il file PARAM.DAT sarà un file di dati ASCII senza intestazione, 
mentre FLAGDUMP.SRN un file binario con intestazione. 


Si noti come il programma cerchi deliberatamente di leggere dal file PARAM.DAT prima 
di scrivervi al fine di stabilire se il file esiste già. Se non esiste viene riportato un errore; 
l’errore viene trattato dal programma e l’esecuzione procede senza interruzioni. Se il file 
esiste non viene riportato nessun errore ed il programma chiede automaticamente se si 
vuole riscrivere sul file. 


I particolari della copia dello schermo, cioè la modalità di schermo, la tavolozza dei colori 
e il nome del file contenente l’informazione attuale, vengono salvati in un file di 
parametri. Ciò illustra l’uso dei file di dati per scrivere le variabili di un programma 
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(dumpfile$) e le costanti (1) salvandole per usarle con un altro programma. 
Caricamento di uno schermo 


Il seguente programma di esempio è un programma multi uso che usa un file di parametri 
per controllare la sua azione. Si noti come le variabili sono inserite dal file di dati con la 
funzione EOF che permette una variazione automatica della dimensione del file. E” 
importante che lo schermo visualizzato dal programma sia stato salvato in una posizione 
nota in memoria, altrimenti il risultato sarà deviato. Ciò è assicurato salvando il 
programma con un comando MODE e stando attenti a non far scrollare lo schermo. 


10 DIM colour(15): REM Preparativi per 16 colori 
20 OPENIN “param.dat” 

30 INPUT #9,nomefile$,screenmode 
40 i=0 

50 WHILE NOT EOF 

60 INPUT #9, colour(i) 

70 INK i,colour(i) 

80 i=i+1 

90 WEND 

100 CLOSEIN 

110 MODE screenmode:BORDER 0 
120 LOAD nomefile$ 

run 


Elenco dei comandi esterni AMSDOS 
|A 
|A 


COMANDO: Fissa come drive per difetto il Drive A. E” equivalente a |DRIVE con 
parametro A (Il drive principale di un computer è il Drive A). 


|B 
|B 


COMANDO: Fissa come drive per difetto il Drive B. E’ equivalente a |DRIVE con 
parametro B (Il drive principale di un computer è il Drive A). 
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|CPM 

|CPM 

COMANDO: Commuta su un ambiente di disco alternativo caricando il sistema 
operativo dal disco di sistema. Il sistema operativo fornito con il computer è CP/M Plus 
e CP/M 2.2 

Questo comando non avrà esito positivo se il drive non contiene un disco di sistema con 
la copia di CP/M sul lato 1 (Side 1) che caricherà CP/M Plus mentre le copie del lato 4 
(Side 4) caricheranno il vecchio sistema operativo CP/M 2.2. 

|DIR 

|DIR[,<espressione stringa>] 


|DIR,"*.BAS” 


COMANDO: Visualizza la directory del disco (in classico modo CP/M) e lo spazio 
libero. Se l’espressione stringa viene omessa viene assunto il carattere jolly *.*. 


IDISC 

|DISC 

COMANDO: E’ equivalente ai due comandi IDISC.IN e IDISC.OUT 
|DISC.IN 

|DISC.IN 

COMANDO: Usa i file come input. 

IDISC.OUT 

|DISC.OUT 


COMANDO: Usa i file come output. 
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DRIVE 
DRIVE, <espressione stringa> 
|DRIVE,”A” 


COMANDO: Fissa il drive per difetto. Questo comando non avrà successo se AMSDOS 
non è in grado di leggere il disco nel drive richiesto. 


|ERA 
|ERA, <espressione stringa> 
|ERA,”*.BAK” 


COMANDO: Cancella tutti i file uguali al nome campione e che non siano a sola lettura 
(Read/Only). I caratteri jolly sono permessi. 


|REN 
|REN,<espressione stringa>,<espressione stringa> 
|REN,"NUONOME.BAS”,"VECNOME.BAS” 


COMANDO: Fornisce un nuovo nome ad un file. Il nuovo nome scelto deve essere 
diverso dai nomi di file già esistenti. I caratteri jolly sono permessi. 


Il parametro USER può essere specificato all’interno della espressione stringa. Il 
comando, ad esempio |REN,”0:NUO.BAS”,”15:VEC.BAS” fornirà un nuovo nome al 
file in USER 15 chiamato “VEC.BAS” chiamandolo “NUO.BAS” in USER 0 senza 
tener conto dei parametri per difetto o di parametri definiti precedentemente da USER. 


ITAPE 
ITAPE 


COMANDO: E’ equivalente ai due comandi |TAPE.IN e |TAPE.OUT. Vengono usati 
quando è connessa una unità a cassette esterna. 
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[TAPE.IN 

[TAPE.IN 

COMANDO: Usa il nastro come file di input. Si usa con una unità a cassette connessa. 
|ITAPE.OUT 

[TAPE.OUT 

COMANDO: Usa il nastro come file di output. Si usa con una unità a cassette connessa. 
|USER 

|USER,<espressione intera> 

|USER,3 


COMANDO: Determina su quale delle 16 sezioni di una directory (tra 0 e 15) devono 
essere eseguite le funzioni di disco (cioè CAT, LOAD, [DIR ecc). 


E’ possibile trasferire, mediante comando IREN, un file di un numero USER su un altro. 
Ad esempio, |REN,”15:EXAMPLE.BAS”,0:EXAMPLE.BAS” trasferisce un file da un 
numero USER 0 ad un numero USER 15, sebbene il nome del file stesso 
(EXAMPLE.BAS) non sia cambiato. 


Come copiare file da un disco in un altro 


File AMSDOS con intestazioni 


E’ possibile copiare questo tipo di file in ambiente CP/M usando PIP (si veda la seconda 
parte di questo capitolo). Qualsiasi file creato da AMSDOS con un record di intestazione 
(si veda “Intestazioni di AMSDOS” descritto precedentemente) sarà interamente copia- 
bile da disco a disco, ma in generale il contenuto del file non verrà compreso dai 
programmi CP/M. 


File ASCII 


I file creati da AMSDOS senza intestazione sono generalmente in ASCII e sono sia 
copiabili sia compresi dai programmi CP/M. In particolare dovrebbe essere possibile 
scambiare facilmente tra AMSDOS e i programmi CP/M i file di programma ASCII, i file 
di dati ASCII e i file di testo ASCII. 
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File a sola lettura (Read/Only) 


E° possibile, usando CP/M, fissare qualunque file in modo sia a sola lettura e/o fissarlo 
su uno stato di sistema speciale nella directory. Tali attributi possono essere fissati o 
riavviati in ambiente CP/M, ma sono accettati da AMSDOS. Per ulteriori dettagli si veda 
la seconda parte di questo capitolo (Utilità SET). 


Come copiare file da disco a cassetta 


Non vi è un supporto in CP/M Plus che permetta di accedere ai file su nastro e copiarli 
su disco nè di creare file su nastro prelevandoli da disco. Se è necessario copiare dei file 
in tal modo occorre usare CP/M 2.2 (sul lato 4 (Size 4) dei dischi di sistema). CP/M 2.2 
contiene le utilità COLAD e CSAVE atte a tale scopo e sono usate come mostrato nelle 
tabelle che seguono. 


Procedure di copia di file 


Le tabelle che seguono spiegano come effetture la copia di file tra tutti i tipi di dischi e 
nastri (se connessi). Esse assumono che non vi sia connesso alcun disco addizionale. Non 
è possibile copiare programmi BASIC protetti da e su nastro nè copiare un file binario 
(come un gioco per computer domestici) da e su nastro, a meno che non sia noto 
l’indirizzo di caricamento. Ulteriori dettagli sui programmi PIP, CLOAD e CSAVE 
sono fornite nella parte 2 di questo capitolo. 


Per le tabelle di copia si consultino le due pagine seguenti... 
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COPIA SU: 
AMSTRAD BASIC 


su nastro * 


Binary 
su nastro * 


ASCII 


su nastro * 


AMSTRAD BASIC 


su disco * 


ASCII 


su disco 


Binary 
su disco * 


* Il file ha intestazione 


AMSTRAD BASIC 
su nastro * 


ITAPE 
LOAD"FILE" 
cambiare nastri> 
SAVE "FILE" 
IDISC 


ITAPE 
LOAD"FILE" 
cambiare nastri> 
SAVE "FILE",A 
IDISC 


ITAPE 
LOAD"FILE" 
IDISC 
SAVE"FILE" 
ITAPE 
LOAD"FILE" 
IDISC 

SAVE "FILE",A 


COPIA DA: 
ASCII data Bin 


ary 
su nastro * su nastro * 


H=HIMEM 
ITAPE 
MEMORY .s:-1 
LOAD"FILE" 
cambiare nastri 
SAVE"FILE" ,B, 
&,d[, 0] 
IDISC 
MEMORYH 
nota 2» 

Inserire disco CP/M 2.2 disc 

ICPM 

CLOAD"FILE",TEMP 

cambiare nastri 

CSAVETEMP, "FILE" 


ERATEMP 

AMSDOS 

nota 1» 

Inserire disco CP/M 2.2 

ICPM 

CLOAD "FILE" 

AMSDOS 
H=HIMEM 
ITAPE 
MEMORY .s:-1 
LOAD"FILE" 
IDISC 
SAVE"FILE" ,B, 
<> , I , n] 
MEMORYH 
nota 2» 


<nota 1> Richiede spazio libero su disco per il file temporaneo “TEMP” 
<nota 2> <s> è l’indirizzo iniziale del file, <> la lunghezza, <r> è indirizzo opzionale di 


esecuzione. 


AMSDOS e CP/M 
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COPI 
AMSTRADBASIC ASCII data AMSDOS Binario 


A DA: 
Tutti gli 


COPIA SU: su disco * su disco su disco altri dischi 
AMSTRADBASIC | LoAD"FILE" 
su nastro * ITAPE 
SAVE "FILE" 
IDISC 
H=HIMEM 
Binary MEMORY 8-1 
su nastro * LOAD "FILE" 
ITAPE 
SAVE"FILE",B, 
4, n] 
IDISC 
MEMORYH 
ASCII LOAD"FILE" Inserire disco CP/M 2.2 
su nastro ITAPE ICPM ICPM 
SAVE "FILE",A CSAVEFILE CSAVEFILE 
IDISC AMSDOS AMSDOS 
-0 
Inserire disco CP/M 2.2 
ICPM 
CSAVEFILE 
AMSDOS 
AMSTRADBASIC | LOAD"FILE" 
su disco* cambiare dischi 
SEME SERI 
Inserire disco CP/M 2.2 
ICPM 
PIP B:=FILE\ 
AMSDOS 
ASCII LOAD"FILE" 
su disco cambiare dischi ICPM 
SAVE "FILE",A PIP B:=FILE 
AMSDOS 
AMSDOS Binary Inserire disco CP/M 2.2 
su disco * ICPM 
PIP B:=FILE 
FRI AMSDOS 
DIG St Inserire disco CP/M 2.2 
altri dischi 
ICPM 
. : : PIP B:=FILE 
* : 
Il file ha intestazione AMSDOS 


<nota 2> <s> è l’indirizzo iniziale del file, <l> la lunghezza, <r> è indirizzo opzionale di 


esecuzione. 


<nota 3> Il file di destinazione non può essere usato direttamente da BASIC. Comunque, 
questa opzione è utile come trasporto a basso costo o mezzo per copie di riserva. Il file 
può essere ricopiato su disco mediante comando CLOAD “FILE” (su CP/M 2.2). 
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Guida di riferimento dei messaggi di errore 


Quando AMSDOS non può, per qualche ragione, eseguire un comando visualizza un 
messaggio di errore. Se il problema è di tipo hardware al messaggio di errore segue la 
domanda: 

Retry, Ignore or Cancel? 


(Ovvero: Riprova, Ignora o Annulla?) 


R fa in modo che l’operazione venga ripetuta, possibilmente dopo che l’utente ha 
rimediato alla causa. 


| fa sì che il computer continui come se il problema non sia stato incontrato, che porta 
spesso ad un risultato inaspettato e poco conveniente. 


C fa sì che l’operazione venga annullata, il che comporta spesso un ulteriore messaggio 
di errore. 


Significato dei messaggi di errore 


Unknown command 
...Il comando non è stato scritto correttamente. 
Bad command 


...Il comando non può essere eseguito per qualche ragione. Un errore di sintassi o una 
configurazione hardware inappropriata. 


<nomefile> already exists 

...L’utente sta cercando di fornire un nome già in uso. 

<nomefile> not found 

...Il file non esiste. 

Drive <drive>: directory full 

...Non vi è più spazio disponibile nella directory per la nuova voce. 
Drive <drive>: disc full 


...Non vi è più spazio su disco per i nuovi dati. 
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Drive <drive>: disc changed, closing <nomefile> 
...] dischi sono stati cambiati con ancora file aperti. 
<nomefile> is read only 


...Non è possibile usare il file poichè è a sola lettura (read/Only). I file possono essere 
fissati, in ambiente CP/M solo a sola lettura (Read/Only) o lettura/scrittura (Read/Write). 


Drive <drive>: disc missing 


...Non vi è disco nel drive, o il disco non è situato ed inserito correttamente. Si consiglia 
di estrarlo e reinserirlo e di scrivere R. 


Drive <drive>: disc is write protected 


...Si è cercato di scrivere su un disco con la tacca di protezione dalla scrittura aperta. Per 
usare il disco occorre estrarlo e chiudere la tacca, quindi reinserire il disco e scrivere R. 


Drive <drive>: read fail 


...Errore di lettura su disco di tipo hardware. Si consiglia di estrarre il disco, reinserirlo 
e scrivere R. 


Drive <drive>: write fail 


...Errore di scrittura su disco di tipo hardware. Si consiglia di estrarre il disco, reinserirlo 
e scrivere R. 


Failed to load CP/M 


...Errore di lettura in fase di caricamento di CP/M in un comando |CPM, oppure non si 
sta usando un disco di sistema contenente CP/M valido. Si noti che cercando di caricare 
CP/M da un disco di dati formattato si produrrà un errore di tipo “read fail”. 
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Parte 2: CP/M 


CP/M Plus 


Argomenti trattati: 


* Introduzione a CP/M 

* Avviamento di CP/M Plus 
* Modo diretto 

* Programmi transienti 


* Gestione delle periferiche 
* Uso di CP/M 2.2 


CP/M Plus è un disco di sistema. E” un programma speciale che permette di sfruttare le 
reali potenzialità del CPC6128. I 128K di RAM vengono usati interamente con oltre 61K 
a disposizione per i programmi dell’utente. Il CP/M permette di accedere ai file di dati 
in modo diretto e l’implementazione del CPC6128 include un sofisticato emulatore di 
terminale. 


Poichè CP/M è disponibile su diversi computer vi sono centinaia di programmi applica- 
tivi disponibili e molta documentazione. 


Per ulteriori dettagli su CP/M Plus e per informazioni su come scrivere programmi e sulle 
implementazioni AMSTRAD del CP/M Plus si consulti una guida di CP/M Plus. 


Introduzione 


Il sistema operativo CP/M fornisce un modo per comunicare con il computere trattare file 
e periferiche. Sono disponibili comandi speciali (e programmi di utilità su disco) per 
aiutare ad eseguire i propri programmi applicativi. 
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Molti utenti desiderano conoscere quanto basta per iniziare e il resto di questo capitolo 
elenca tutte le caratteristiche senza punti oscuri o troppi fronzoli. 


BASIC ha un suo modo diretto e il prompt “Ready”, anche CP/M ha un modo diretto ed 
è identificato dai prompt A> o B>. Sono disponibili molti comandi interni, ma la maggior 
parte del lavoro consiste nel caricare ed eseguire “programmi transienti”. Sono chiamati 
“transienti” perchè sono presenti in memoria (caricati da disco) solo al momento del loro 
uso. 


Così come gli errori standard di CP/M, il sistema genera diversi messaggi di errore di tipo 
hardware che si possono distinguere dagli altri in quanto questi appaiono normalmente 
in fondo allo schermo sotto forma di menù a barre. 


CP/M Plus su disco 


[N 


La maggior parte di CP/M Plus risiede in un file speciale il cui tipo di file è “ EMS”, ed 
è situato sul lato 1 (Side 1) del disco di sistema. Il computer carica CP/M da tale file in 
memoria in due processi. 


Inizialmente, il comando |CPM di AMSDOS carica il primo settore di traccia 0. Su un 
disco di sistema questo settore è stato modificato in modo carichi il file .EMS in memoria. 
Le restanti tracce del sistema sono inutilizzate. 


File di avvio iniziale 


Durante il processo di caricamento, quando viene attivato CP/M Plus, se il file 
PROFILE.SUB è presente su disco, le istruzioni in quel file vengono eseguite mediante 
comando SUBMIT. Questa caratteristica può essere utilizzata per ridefinire la tastiera, 
modificare lo schermo di output, inizializzare la stampante o far eseguire auto- 
maticamente un programma applicativo. Nel capitolo 4 indichiamo come fornire un 
nuovo nome al file Profile presente sul lato 1 per poterlo attivare. 


Mentre il file profile è in esecuzione viene aperto, sul disco, un file temporaneo; il disco 
deve dunque essere abilitato alla scrittura. Questo perchè il disco originale stesso 
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potrebbe non includere un file profile riconoscibile. 

I file profile possono essere scritti usando un word processor, un editor (come ED.COM) 
o direttamente da BASIC. Il piccolo programma BASIC che segue potrebbe essere stato 
usato per generare un file PROFILE.SUB. 


10 OPENOUT “PROFILE.SUB” 

20 PRINT #9, “SETKEYS KEYS.CCP” 
30 PRINT #9, LANGUAGE 3" 

40 CLOSEOUT 


Codici di controllo da console 


In ambiente CP/M vengono usate molte operazioni di tasti speciali. Queste parole chiave 
sostituiscono l’azione del tasto [ESC] e dei tasti cursore usati nel BASIC AMSTRAD. 
I codici di controllo che seguono sono assegnati dopo l’esecuzione del comando: 
SETKEYS KEYS.CCP 


... dove entrambi i programmi transienti SETKEY S.COM e il file KEYS.CCP sono situati 
nel lato 1 (side 1) del disco di sistema. 


Codice di controllo Tasto Azione 
[CONTROL]JA <- Sposta il cursore di un carattere a 
sinistra 


[CONTROL]B [CONTROL]<- 
o [CONTROL]-> Sposta il cursore all’inizio della li- 
nea. Se il cursore è già all’inizio 
della linea lo sposta alla fine. 


[CONTROL]C [CONTROL][ESC] Abbandona. 
[CONTROL]E [CONTROL][RETURN] Ritorno a capo fisico 


[CONTROL]F -> Sposta il cursore di un carattere a 
destra. 

[CONTROL]G [CLR] Cancella il carattere su cui è 
posizionato il cursore. 

[CONTROL]H [DEL] Cancella il carattere precedente il 
cursore 

[CONTROL]I [TAB] Sposta il cursore sul punto di tabu- 
lazione successivo. 

[CONTROL]y Invia una linea di comando 
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[CONTROL]K [CONTROL][CLR] Cancella fino alla fine della linea. 
[CONTROL]JM [RETURN] o [ENTER] 


[CONTROL]P Commutatore hardcopy. Attiva o 
disattiva gli schermi su stampante 


[CONTROL]Q Riattiva l’output su schermo. 


[CONTROL]R [CONTROL][ENTER] Riscrive la linea di comando. 


[CONTROL]JS [ESC] Ferma l’output su schermo da CP/ 
M. Si usa [CONTROLJ]Q per ri- 
prenderla. 

[CONTROL]JU Scarica la linea 

[CONTROL]W [COPY] Richiama l’ultima linea di comando 
scritta. 

[CONTROL]X [CONTROL][DEL] Cancella dall’inizio della linea fino 


alla posizione del cursore. 


[CONTROLI]Z Fine testo. 
Nomi di file 


Molti comandi accettano come parametri nomi di file e, dove specificato, il nome file può 
contenere caratteri jolly (si veda il paragrafo “Caratteri jolly” nella parte 1 di questo 
capitolo). Tutti i nomi di file verranno commutati in maiuscolo. 


Nei comandi diretti e nei programmi di utilità NON sono richieste le doppie virgolette 
intorno al nome del file. Si ricorda che i nomi di file possono avere come prefisso sia A: 
che B: per forzare la scelta del drive. 

Un tipico comando CP/M è: 

TYPE KEYS.CCP 


... dove TYPE è la funzione richiesta che indica di visualizzare sullo schermo e 
KEYS.CCP è il nome del file che si vuole visualizzare. 
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Attivazione del drive per difetto. 


Se si ha un drive addizionale connesso è possibile attivare quello per difetto scegliendo 
trail Drive A eil Drive B scrivendo A: o B: al prompt B> o A>. Tale prompt naturalmente, 
indica che quello è il drive attuale. Aggiungendo A: o B: come prefisso al nome del file 
non si modifica il drive per difetto. 


Comandi diretti 


Vi sono molti comandi diretti che possono essere immessi al prompt A> o B>. Ogni 
comando può essere abbreviato e sebbene le semplici funzioni descritte sono interne vi 
sono inoltre molti comandi transienti sofisticati che hanno lo stesso nome. 


Comando DIR 


DIR elenca la DIRectory del disco. I nomi dei file non vengono visualizzati in base ad un 
ordine particolare ma la posizione del nome del file indica quella della voce del file nella 
directory del disco. I caratteri jolly sono permessi. I file fissati con l’attributo SYS non 
vengono elencati. 


DIR elencherà tutti i file del drive per difetto 
DIR B: elencherà tutti i file del Drive B: 
DIR *.BAS elencherà tutti i file di tipo .BAS 


DIR B:*.BAS elencherà tutti i file di tipo .BAS del Drive B: 
DIR PIP.COM elencherà solo il file PIP.COM (se esiste) 


Comando DIRSYS o DIRS 


DIRSYS o DIRS elenca solo le voci presenti nella directory con attributo SYS altrimenti 
viene eseguito come DIR. L’attributo SYS è descritto successivamente. 


Comando ERASE o ERA 


Il comando ERA è usato per cancellare i file dalla directory. Vengono cancellate solo le 
voci presenti nella directory, quindi i dati restano nella sezione di disco fino a quando tale 
spazio non viene riutilizzato da un altro file; l'informazione non è comunque recupera- 
bile. I caratteri jolly sono permessi e se usati ERA chiede conferma. ERA non elenca i 
nomi dei file che vengono cancellati. Se un file da cancellare è di tipo solo lettura (Read/ 
Only) il comando verrà abortito. L’attributo solo lettura verrà descritto successivamente. 
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ERA PIP.COM cancellerà il file PIP.COM 

ERA B:PIP.COM cancellerà il file PIP.COM sul Drive B: 
ERA *.BAS cancellerà tutti i file .BAS 

Comando RENAME o REN 


REN permette di rinominare un file esistente. Prima di tutto occorre specificare il nuovo 
nome a cui fa seguito il segno = e successivamente il nome di file esistente. Se il nuovo 
nome esiste verrà visualizzato un messaggio di errore. 


I caratteri jolly non possono essere usati con il comando REN ed è quindi necessario usare 


il comando RENAME.COM. 


REN NUONOME.BAS=VECNOME.BAS  rinominerà il file VECNOME.BAS con 
NUONOME.BAS 


REN B:NUONOME.BAS=VECNOME.BAS rinominerà il file VECNOME.BAS con 
NUONOME.BAS sul Drive B. 


Comando TYPE o TYP 


TYPE visualizza il file specificato sullo schermo. Se il file non è di tipo ASCII si possono 
verificare effetti strani e indesiderati. 


TYPE KEYS.CCP 

...visualizzerà il file KEYS.CCP 

Comando USER o USE 

USER modifica il numero utente attuale. CP/M inizia con il numero utente attuale fissato 
a 0. Di solito è possibile accedere solo ai file identificati con numero utente attuale, 
fornendo così un metodo di suddivisione della directorty. 

Ad un file in User 0 con attributo SYS possono accedere tutti i numeri utente. Questa è 


una caratteristica molto utile poichè rende disponibili a tutti gli utenti i programmi 
applicativi, senza rendere necessaria una copia in ogni area utente. 


USER 3 


...fissa il numero utente a 3 
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Comandi transienti 


Per effettuare gestione di file più sofisticata di quella permessa in modo diretto occorre 
utilizzare uno dei programmi di utilità forniti. Questi sono richiamabili scrivendo il nome 
del programma a cui fa seguito il nome del file e/o alcuni parametri. Si è già probabilmente 
usato DISCKIT3. 


I comandi vengono suddivisi in diverse categorie indicate tra breve. La documentazione 


completa di tali programmi è vasta e ulteriori informazioni sono contenute nei file HELP 
(sul lato 3 (Side 3) del disco di sistema) e in “SOFT971 - A Guide to CP/M Plus”. 


I comandi DISCKIT3, SETKEYS, SETLST, SETSIO, PALETTE, LANGUAGE e 
AMSDOS oltre a GSX e alle installazioni di LOGO8 sono progettate da AMSTRAD e 
sono eseguibili solo su sistemi AMSTRAD. Non sono eseguibili su qualsiasi altro sistema 


CP/M. 


E’ possibile inserire in una linea comandi multipli; tali comandi sono separati da un punto 
esclamativo. Ad esempio: 


LANGUAGE 3!SETKEYS KEYS.WP 
Gestione delle periferiche 


DISCKIT3 è un programma completo che formatta, copia e controlla. E’ più veloce 
formattare in fase di copia che formattare e poi copiare. Menù molto chiari indicano quali 
tasti funzione occorra premere. I dischi in vendita sono una forma speciale di dischi di 
sistema e sono progettati per la distribuzione del software, anche se i dischi di dati sono 
più indicati per tale attività in ambiente CP/M Plus. 


ATTENZIONE 


La licenza d’uso del proprio CP/M (determinato elettronicamente mediante 
numero seriale) ne permette l’uso su un solo sistema. Ciò significa in particolare 


che è proibito dare ad altre persone un disco di copia del CP/M con il PROPRIO 
numero seriale. Poichè le copia del lato 1 (Side 1) del pacchetto software originale 


includeranno il proprio CP/M (nel file .EMS), si deve fare attenzione a non 
vendere, scambiare o separare un qualsiasi disco con tale file al suo interno. 
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I caratteri 


Il CPC6128 ha un set di caratteri internazionale.Il comando LANGUAGE scambia alcuni 
di questi caratteri in modo che il software semplice possa visualizzare caratteri alternativi 
e accentati. Ulteriori informazioni sono contenute nella parte 16 del capitolo “Riferimen- 
ti”. 


Il comando 


LANGUAGE 3 


...fisserà il set di caratteri inglese, il quale scambia i segni # e £ (apparsi nel set per difetto 
americano). 


Colori 


I colori per difetto del CP/M Plus sul CPC6128 (con monitor a colori) sono bianco 
brillante su sfondo blu. Questi colori possono essere modificati mediante comando 
PALETTE, il quale può assumere diversi parametri, uno per ogni inchiostro; ink 0 
include lo sfondo e il bordo; ink 1 è per il testo. Ogni colore è rappresentato da un numero 
compreso tra 0 e 63; questo può essere usato, su un monitor a fosfori verdi, per misurare 
l’intensità del colore (luminosità). 


E’ possibile specificare uno qualsiasi dei numeri di inchiostro, da uno a sedici, sebbene 
solo i primi due saranno visibili in modalità ad 80 colonne. 


Il comando: 
PALETTE 63,1 


..Invertirà i parametri normali di ink 0 e ink 1, fornendo sfondo bianco brillante (63) con 
testo in blu (1). 


Per selezionare i colori (o l’intensità) si consulti la seguente tabella. E’ possibile usare sia 
la notazione esadecimale che quella decimale. 
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Colore Esadecimale Decimale Colore Esadecimale Decimale 


Nero &00 Blu pastello &2B 
Blu &02 Arancio &2C 
Blu brillante &03 Rosa &2E 
Rosso &08 Magenta pastello &2F 
Magenta &0A Verde brillante &30 
Malva &0B Verde mare &32 
Rosso brillante &0C Azzurro brillante &33 
Porpora &OE Verde limone &38 
Magenta brillante —&OF Verde pastello &3A 
Verde &20 Azzurro pastello &3B 
Azzurro &22 Giallo brillante &3C 
Blu cielo &23 Giallo pastello &3E 


Giallo &28 Bianco brillante &3F 
Bianco &2A 


La tastiera 


I codici generati dalla tastiera possono essere modificati dal comando SETKEYS. Ciò 
permette di assegnare i codici ai tasti e di espandere i token. I codici attuali devono essere 


scritti in un file il cui nome deve poi essere specificato nel comando SETKEYS. Il file 
di comandi può essere creato da un editor di testi, da PIP o da BASIC. Ad esempio: 


SETKEYS KEYS.TST 
.. dove KEYS.TST contiene: 


E &8C “DIR T M” token di espansione 12 
8NSC”T H”backspace=[CONTROL]H, ASCII08 


...ridefiniremo prima di tutto il token di espansione [(CONTROL][ENTER] (rappresen- 
tato da &OC) in modo diventi DIR[RETURN] e poi si fa diventare il tasto <- (tasto 
numero 8) tasto di backspace (<-). 


I file standard forniti con il CPC6128 sono KEYS.CCP per i comandi di editing di CP/ 
M, KEYS.DRL per Dr.LOGO (sul lato 3) e KEYS.WP per molti word processor. 
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Stampanti 
L’inizializzazione delle stampanti può essere fatta dal comando: 


SETLST <nomefile> 


.. dove <nomefile> contiene la stringa o le stringhe da inviare alla stampante. Così come 
nel file di comando SETKEYS, i codici di controllo possono essere rappresentati da: 


i) <carattere> 


040... 


T ‘<valore carattere>’ 


000... 


T ‘<codice di controllo>’ 


.. dove i codici di controllo sono ESC, FF ecc, come mostrato nella tabella dei caratteri 
ASCII nel capitolo “Riferimenti” 


Un codice di inizializzazione utile per molte stampanti è il valore 15 che pone la 
stampante in modalità condensata. 


Il comando: 

PRINT #8,CHR$(15) 

... dovrebbe fissare ciò in BASIC. In CP/M il comando è: 
SETLST CONDENSE 


...dove il file CONDENSE contiene una delle seguenti linee di testo: 


...cChe sono tutte interpretate come numero decimale 15. 


Alcuni programmi applicativi richiedono uno schermo 24x80. Il comando SET24x80 
serve a tale scopo. 
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I comandi: 

SET24x80 

DE 

SET24x80 ON 

...attivano la modalità 24x80 e: 

SET24X80 OFF 

...la disattivano. 

Il normale schermo del CPC6128 è 24x80 con la linea in fondo riservata per i messaggi 


di errore. Disabilitando la modalità 24x80 sarà solo percettibile se la linea di stato è 
disabilitata. Per ulteriori dettagli si consulti la parte 15 del Capitolo 7. 


Interfaccia seriale 


Vi è inoltre una interfaccia seriale (Input/Output) RS232. La sua esistenza può essere 
provata scrivendo il comando SETSIO (senza parametri): 


SETSIO 


...0 può essere fissata usando un comando che può includere qualche (o tutti) i seguenti 
parametri: 


SETSIO, RX 1200, TX 75, PARITY NONE, STOP 1, BITS 8, 
HANDSHAKE ON, XOFF OFF 


..tale comando dovrebbe fissare una nuova configurazione. 
I baud rate e gli stati XON/XOFF sono effettuati da uno degli assegnamenti possibili del 
comando DEVICE. DEVICE si occupa dei dispositivi logici e fisici. I dispositivi logici 


sono indicati da :. Per esaminare tutti gli attributi di un dispositivo attuale si scriva: 


DEVICE 
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...€ gli attributi possono essere cambiati da comandi come: 


DEVICE SIO[1200] — ...fissa SIO a 1200 baud 
DEVICE SIO[KXON] | ...attiva SIO protocollo XON/XOFF 
DEVICE SIO[NOXONI] ...disattiva SIO protocollo XON/XOFF 


Le connessioni tra i dispositivi logici e quelli fisici possono essere modificati. Di solito: 
CON: è fissato su CRT (tastiera/schermo, AUX: è fissato su SIO (interfaccia seriale) e 
LST: è fissato su LPT (interfaccia stampante Centronics). Il comando: 


DEVICE LST:=SIO 

... invierà l’output della stampante all’interfaccia seriale (se connessa). 

Si noti come questo è una redirezione di canale, da non confondere con le caratteristiche 
di copia di file di PIP. I due comandi GET <nomefile> e PUT <nomefile> ridirigono 


l’input o l’output della console, e l’output della stampante, indicando loro come usare un 
file piuttosto che il dispositivo di canale. 


PIP 


L’utilità PIP (Peripheral Interchange Program) permette di trasferire l'informazione tra 
il computer e le periferiche. 


In generale la forma di tale comando è la seguente: 

PIP <destinazione>=<origine> 

L’<origine> e la <destinazione> possono essere entrambi nomi di file con caratteri jolly 
permessi nell’origine, o un dispositivo logico. Si possono usare i seguenti dispositivi 
logici: 


Come origine Come destinazione 

CON: console input —CON: console output 

AUX: input ausiliare AUX: output ausiliare 

EOF: fine file LST: stampante 
PRN: stampante con punti di tabulazione, espansione, numeri 
di linea e fine pagina. 


Esempi di PIP: 
PIP B:=A*.COM 


...cOpia tutti i file *.COM dal Drive A: nel Drive B: 
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PIP KEYBOARD.CPM=KEYS.CCP 

...effettua una copia di KEYS.CCP e la chiama KEYBOARD.CPM 

PIP CON:=KEYS.CCP 

...invia il file KEYS.CCP sullo schermo (effetto simile alcomando TYPE KEYS.CCP). 
PIP LST:=KEYS.CCP 

...invia il file KEYS.CCP alla stampante 

PIP TYPEIN.TXT=CON: 

...pone l’input da tastiera nel file TYPEIN.TXT 

Si noti che quest’ultima operazione è determinata da un codice di controllo 
[CONTROLIZ e che per ottenere una nuova linea occorre scrivere ogni volta 
[CONTROL]J dopo [RETURN]. [CONTROL]]J in codice ASCII è il simbolo a capo 
(line feed). 

Se scritto senza parametri PIP visualizza il prompt * ed è possibile inserire i comandi che 
si desiderano. Questa forma è particolarmente utile nella copia di file quando non si ha 
il file PIP.COM nè sul disco origine nè su quello di destinazione. E’ possibile caricare 
PIP dal lato 1 disco di sistema, togliere il disco ed inserire i dischi che si vogliono usare 
in fase di copia. 

Per uscire dall’ambiente PIP è sufficiente premere [RETURN] al prompt *. 

Si noti che PIP può essere usato per effettuare copie di file da un disco in un altro su un 


sistema a singolo drive in quanto avverte quando cambiare il disco. Gli identificatori del 
drive di origine e di quello di destinazione devono essere diversi. 


Gestione di sistema 


DIR, ERASE, RENAME e TYPE sono programmi transienti con più caratteristiche 
delle loro copie interne. Così come per gli altri programmi transienti della Digital 
Research, i parametri secondari sono specificati tra parentesi quadre. Tutti i dettagli sono 
contenuti nei file HELP (sul lato 3 dei dischi di sistema). Alcuni esempi sono: 


DIR [FULL] visualizza la dimensione del file e gli attributi 


ERASE *.COM [CONFIRM] richiede la conferma ad ogni file trovato 
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RENAME richiederà l’inserimento del nuovo nome e del vecchio 


RENAME *.SAV=*.BAK darà un nome nuovo a tutti i file di tipo .BAK nel tipo 
.SAV 


TYPE KEYS.WP [NOPAGE] eliminerà l’impaginazione sullo schermo 


Gli attributi del file SYS (System) e RO (Read/Only) sono stati già menzionati. Questi 
e molti altri attributi possono essere assegnati mediante comando SET il quale accetta 
inoltre l’uso dei caratteri jolly. 

I comandi: 


SET *.COM [RO] 
SET KEYS.CCP [RO] 
SET A:[RO] 


...fissano i file o il drive nello stato Read/Only, al fine di evitare cancellazioni involon- 
tarie. 


I comandi: 


SET *.COM [RW] 

SET KEYS.CCP [RW] 

SET A:[RW] 

..Tiportano i file o il drive nello stato Read/Write. 


I comandi: 


SET *.COM [SYS] 
SET KEYS.CCPI[SYS] 


..forniscono al file l’attributo System (sistema). I file con tali attributi non sono 
visualizzati dal comando DIR (occorre usare DIRS o DIRSYS). I file sono comunque 
disponibili e, in oltre, se tali file sono allocati nell’area User numero 0 questi sono a 
disposizione di tutti gli utenti. 


I comandi: 


SET *.COM [DIR] 
SET KEYS.CCP [DIR] 


...eliminano l’attributo System. 
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Ad ogni disco è possibile assegnare una Label (etichetta) o una Password (parola 
riservata). La password proteggerà la directory stessa più che i file della directory. E” 
possibile, inoltre, assegnare una password ai file stessi. 


SET [NOME=ORLANDO] 
SET [PASSWORD=SILVIO] 
SET [PROTECT=ON] 


...agiscono sul drive per difetto. 


SET *.*[PASSWORD=SILVIO] 
SET *.*[PROTECT=READ] 


..agiscono sui file del disco per difetto (i caratteri jolly *.* indicano “tutti i file”). 


La data e l’ora di stampa possono essere attivate dal comando INITDIR (sul lato 2 del 
disco di sistema). I comandi: 


INITDIR 
SET [CREATE=ON] ...0... SET [(ACCESS=ON] ...c... 
SET [UPDATE=ON] ...con... 

DIR [FULL] 


..inizializzeranno e visualizzeranno la data e l’ora di stampa sul drive per difetto. 
Scrivendo: 


DATE SET 
...viene richiesto ad ogni attivazione di CP/M di regolare l’orologio. Una volta fissato, 
l’orologio terrà traccia dell’ora, e verrà continuamente aggiornato dal 6128 e controllato 


da: 


DATE ...e... 
DATE CONTINUOUS 


ATTENZIONE 


Se è stata attivata la password, l’etichetta su disco, o l’ora e la data, si raccomanda 
di non far scrivere MAI tale disco da AMSDOS o CP/M 2.2, nè da alcun dispositivo 
che abbia tali caratteristiche. 
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Di solito si accederà solo ai file del drive per difetto a meno che non ne venga specificato 
uno particolare. Il comando: 


SETDEF *,A: 


...(dove * indica il drive per difetto) indica a CP/M (quando ricerca i file) di cercare prima 
nel drive per difetto e poi nel Drive A:. In altre parole, se il drive per difetto è B: i file 
verranno cercati automaticamente lì anche se esistono sono nel Drive A:. 


I comandi: 


SETDEF [PAGE] ...c... 
SETDEF [NOPAGE] 


...attivano e disattivano l’impaginazione automatica sullo schermo. 


Si ricorda che molte delle caratteristiche DEVICE, SET e SETDEF in particolare 
quando si riferiscono ai due drive (piuttosto che ai file o ai dischi) necessitano, ogni volte 
si esegue CP/M, di essere fissate, oltre alla data. Questa è la principale applicazione del 


file PROFILE.SUB. 


Per eseguire file o comandi singoli automaticamente occorre usare SUBMIT. I contenuti 
dei file di comando sono di tipo testo ed è possibile includerli nei programmi se il primo 
carattere delle linee del file .SUB è <. 


La dimensione del drive, l'ammontare di spazio e il numero di voci della directory di un 
disco oltre alle aree utenti contenenti file e l’etichetta del disco possono essere visualiz- 
zate mediante combinazioni del comando SHOW: 


SHOW B: 
SHOW B:[LABEL] 
SHOW B:[USERS] 
SHOW B:[DIR] 

SHOW B.[DRIVE] 


...richiedono tutte informazioni sul drive B: 


Procedura di uscita di CP/M Plus 


AMSDOS 


Questo programma abbandona il controllo da CP/M e torna nel BASIC AMSTRAD; da 
quel punto in poi sono disponibili i comandi di disco di AMSDOS. 
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Programmazione avanzata 


Il lato 2 (Side 2) dei dischi di sistema contiene diversi programmi specifici per program- 
matori più esperti. 


Lavoriamo con CP/M 2.2 


Questo paragrafo intende evidenziare le differenze di utilizzo di CP/M 2.2.. 


CP/M 2.2 viene caricato dalla prima delle due tracce di un disco di sistema. Il settore di 
avvio automatico è diverso da quello usato per caricare CP/M Plus ed occorre porre 
attenzione a non confonderli. Sebbene sia possibile usare un disco IBM, o dischi per dati 
in uno qualunque dei drive, considerazioni di tipo operazionale riducono il loro uso al 
secondo drive. 


A meno che non sia richiesto (ad esempio da un comando FILECOPY) dal programma 
CP/M, CP/M 2.2 non permette di scrivere su un disco a meno che questo non sia abilitato. 
In oltre, il tipo di formato di disco (System, Data o IBM) è rideterminato solo quando il 
disco è attivato. Ogni volta che CP/M 2.2 ritorna in modo diretto, oppure quando viene 
scritto [CONTROL] C al prompt A> o B>, viene assunto come drive principale quello 
all’interno del computer (Drive A). Il drive addizionale (Drive B) viene assunto la prima 
volta che vi si accede, dopo aver attivato il Drive A. 


Se si cercasse di scrivere su un disco non attivato verrebbe visualizzato il messaggio: 


Bdos Err on <drive>: R/O 


Occorrerebbe quindi premere un tasto qualsiasi per continuare. Se si cambia disco e 
questo è di formato diverso verrà visualizzato un messaggio di errore di lettura o scrittura. 
Si scriva C per continuare. 


Se si riceve un disco software di diverso tipo, per poterlo usare convenientemente è 
possibile copiarlo su un disco di sistema CP/M 2.2 usando FILECOPY o PIP, oppure 
convertire il disco in uno di sistema aggiungendolo a CP/M. Ciò si può ottenere mediante 
i comandi BOOTGEN e SYSGEN. Si leggano attentamente le licenze d’uso (Ap- 
pendice 1). 


SYSGEN (senza parametri) è un programma di copia che richiede un disco di origine e 
uno di destinazione e copia le tracce di sistema CP/M 2.2 da un disco in un altro. 
Analogamente BOOTGEN copia il Settore 1, traccia 0 e la configurazione del settore da 
un disco in un altro. 


Il comando DIR non accetta parametri (tranne la specifica del file). I nomi dei file non 
vengono visualizzati in base ad un ordine particolare ma la posizione del nome del file 
indica quella della voce del file nella directory del disco. 
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STAT fornisce alcune delle funzioni base di SET e SHOW. I comandi: 


STAT 
STAT A: 
STAT B: 


...visualizzano lo stato del disco e lo spazio disponibile. 


I comandi: 


STAT *.COM 
STAT DISC.BAS 


...visualizzano le informazioni estese su un particolare file. 


I comandi: 


STAT *.COM $R/O 
STAT DISC.BAS $R/O 


..fissano il file a sola lettura (Read/Only), quindi questo non può essere cancellato o 
riscritto per sbaglio. 


I comandi: 


STAT *.COM $R/w 
STAR DISC.BAS $R/W 


..fissano il file nello stato Lettura/Scrittura (Read/Write), ribaltando il precedente 
assegnamento. 


I comandi: 


STAT *.COM $SYS 
STAT SECRET.BAS $SYS 


...fissano il file a disco di sistema (System) in modo che sia invisibile nell’elenco della 
directory e ai programmi di copia. Il file resterà comunque disponibile per tutti gli altri 
scopi. 


I comandi: 


STAT *.COM $DIR 
STAT SECRET.BAS $DIR 


...fissa il file nello stato “Directory”, annullando il precedente assegnamento. 


Il programma di utilità FILECOPY permette di copiare file da un disco in un altro usando 
un singolo drive. Informa del cambio di disco e fornisce informazioni sullo schermo. Se 
nel nome del file si includono dei caratteri jolly FILECOPY chiede conferma ad ogni file 
se lo si desidera copiare. Il programma visualizza il nome di ogni file ogni volta che questo 
viene copiato. 
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FILECOPY *.COM ...copia tutti i file di tipo .COM 
FILECOPY PIP.COM — ...copia il file PIP.COM 


DISCKIT2 esegue le stesse funzioni di DISCKIT3 ma in modo più lento in fase di copia 
dei dischi in quanto ha meno memoria a disposizione. 


Le due utilità che trasferiscono i file da disco a cassetta sono disponibili. Tranne che per 
usi specialistici, è sconsigliabile trasferire file che non siano di tipo ASCII, file di testo. 


Il comando CLOAD (caricamento da cassetta) può avere due parametri: il primo è il nome 
del file origine (cassetta) racchiuso tra doppie virgolette, il secondo è il nome del file 
destinazione. Se il nome del file di destinazione viene omesso, il file su disco assumerà 
lo stesso nome di quello di origine. Se viene omesso il nome del file origine, CLOAD 
caricherà il primo file presente sul nastro. Se il primo carattere del nome del file è ! il 
messaggio usuale di caricamento da cassette verrà omesso. 


Esempio di comando: 
CLOAD “MY LETTER” MYLETTER.TXT 


Il comando CSAVE (salvataggio su cassetta) può avere tre parametri: il primo è il nome 
del file origine e il secondo è il nome del file destinazione (cassetta) racchiusi tra doppie 
virgolette. Se il nome del file di destinazione viene omesso, il file su disco assumerà lo 
stesso nome di quello di origine. Se il primo carattere del nome del file è ! il messaggio 
usuale di salvataggio su cassetta verrà omesso. Se vengono specificati entrambi i nomi 
di file è possibile aggiungere un terzo parametro che può essere usato per specificare la 
velocità di scrittura su nastro; 0 per 1000 baud, 1 per 2000 baud. 


Esempi di comandi: 


CSAVE OUTPUT.TXT “OUTPUT TEXT” 1 
CSAVE DATAFILE 


SETUP 


Questa utilità permette di ridefinire le caratteristiche della tastiera del 6128, la sezione di 
disco, e l’interfaccia seriale. Permette inoltre di effettuare diverse azioni quando CP/M 
2.2 viene inizialmente caricato. Diversamente dalle utilità fornite con CP/M Plus, che 
eseguono il loro compito in esecuzione, SETUP modifica la configurazione di un settore 
di un disco. Tale modo è simile a quello svolto dall’utilità PROFILE.SUB. 
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Il programma è guidato da menù e quando uno schermo particolare è corretto o non 
richiede modifiche si sposta su quello seguente mediante pressione del tasto Y dopo la 
domanda: 


Is this correct (Y/N) 


(Ovvero: E’ corretto (S/N)) 


Il programma può essere fermato tramite i tasti [CONTROL]C. Quando si sono 
apportate tutte le modifiche viene chiesto: 


Do you want to update your system disc (Y/N):_ 


(Ovvero: Volete aggiornare il disco di sistema (S/N)) 


... fornendo la possibilità di mantenere la configurazione esistente scrivendo N. Viene 
inoltre richiesto: 


Do you want to restart CP/M (Y/N) 


(Ovvero: Volete renizializzare CP/M) 
...permettendo di caricare e provare una nuova configurazione premendo Y. 


Per copiare un settore di configurazione da un disco in un altro, si usa BOOTGEN oppure 
si carica SETUP dal disco di origine, si risponde Y ad OGNI domanda e si inserisce il 
disco di destinazione prima di rispondere Y alla domanda “Do you want to update your 
system disc (Y/N) 


I caratteri con valore ASCII minore di 32 possono essere scritti in stringhe scrivendo T 
seguito da un carattere del set @,A-Z,[,\,],>,_ 


Le opzioni seguenti sono quelle che richiedono comunemente una maggiore attenzione: 
*** Initial command buffer: (Buffer di comando iniziale) 

Qualsiasi carattere qui inserito apparirà come se fosse stato scritto in modo diretto quando 
si è inizialmente caricato CP/M. Ciò ha effetto di auto esecuzione di un particolare 
programma. Si ricordi di includere il tasto equivalente a [RETURN] rappresentato dai 


due caratteri M. 


Per eseguire automaticamente, ad esempio, il comando DIR il buffer iniziale deve 
contenere: 


DIR TM 
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...0, per eseguire automaticamente il programma Dr.LOGO, tale buffer deve includere: 


SUBMIT LOGO2 TM 
Sign-on string: 


Questo è il messaggio visualizzato in alto sullo schermo quando viene caricato CP/M. Si 


noti l’uso di T J T M per dare un effetto di a capo. La prima parte del messaggio standard 
fissa i colori dello schermo e del bordo in modo che lavori su 80 colonne, e deve essere 
copiato esattamente come presentato. 


Keyboard translations: 


Permette ai nuovi valori ASCII di essere fissati nei tasti, simula effettivamente il 


comando KEYDEF di BASIC. I parametri richiesti sono i codici di controllo e i valori 
ASCII per fissarli. Per un esempio dei tasti numerici si faccia riferimento al diagramma 
in alto a destra sul lato del computer o nella parte 4 del capitolo “Riferimenti”. 


Keyboard expansions: 


Simula effettivamente il comando KEY di BASIC. 
Infine ... 


I comandi DISCKIT2, SYSGEN, BOOTGEN, FILECOPY, SETUP, CSAVE e 
CLOAD sono progettati da AMSTRAD, ed operano esclusivamente con CP/M 2.2 su 
sistemi AMSTRAD. Non vi sono tali funzioni su altri sistemi CP/M sebbene altre ditte 
possano fornire utilità simili (spesso con lo stesso nome) per il loro hardware. 


I programmi che sono elencati di seguito sono disponibili per un uso specialistico sul lato 
4 (Side 4); si consiglia l’utente, inoltre, di leggere “SOFT159 - A guide to CP/M” o un 
libro analogo. 


ASM Assembler 8080 

DDT Assembler 8080 

DUMP Utilità di copia di file esadecimale 

ED Un editor di testi semplice 

LOAD Converte un file .HEX prodotto da ASM in un file .COM 
MOVECPM Crea CP/M 2.2 con una nuova (più piccola) dimensione TPA 
SUBMIT Processo batch di modo diretto 

XSUB Processo batch di un programma transiente 


Tali programmi vanno usati in CP/M 2.2 (lato 4) e non devono essere confusi con gli altri 
programmi di CP/M Plus residenti sugli altri dischi (Lati 1,2 e 3) 
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Capitolo 6 
Introduzione a LOGO 


Questo paragafo intende introdurre l’argomento LOGO, insieme ad 
esempi, e fornire una guida ai comandi disponibili. Non intende essere 
un manuale completo o una guida di riferimento, e si consiglia di 
consultare le diverse pubblicazioni disponibili per maggiori informa- 
zioni relative a questo argomento. 


Questo capitolo presenta: 


* Il concetto di LOGO 

* Il caricamento e l’esecuzione di Dr. LOGO 
* I grafici con la tartaruga 

* La scrittura di procedure personali 

* La modifica delle procedure personali. 


Cos' è LOGO? 


LOGO può essere un aiuto per crescere come programmatori, anche se non si è mai 
programmato in precedenza. 


LOGO è un potente linguaggio di programmazione che si sta rapidamente diffondendo 
per la sua estrema semplicità di comprensione e di uso. 


Le procedure vengono utilizzate come blocchi da costruzione per creare programmi 
LOGO. Dr. LOGO è un insieme di procedure, dette primitive, che possono essere 
utilizzate per costruire nuovi programmi. 


Durante gli anni ‘70 un gruppo di esperti di calcolatori e di educatori, sotto la direzione 
di Seymour Papert, sviluppò LOGO insieme alla grafica con la tartaruga per consentire 
a bambini molto piccoli di programmare e di usare un computer. 


La tartatuga venne sviluppata in modo che i piccoli studenti potessero disporre, come 
sostiene Papert, di “un oggetto con cui pensare, uno strumento che li aiutasse ad imparare 
in modi nuovi”. 


La tartaruga, il cui aspetto è quello della punta di una freccia, può essere diretta all’interno 
dello schermo mediante l’uso di semplici comandi. 
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Dr. LOGO 


Dr. LOGO è una particolare implementazione di LOGO adattata al personal computer 
AMSTRAD, per rendere la programmazione ancora più semplice. Sono state incluse 
alcune estensioni per poter disporre delle potenti capacità sonore del 6128, mentre 
l’editing del programma è facilitato dall’inserimento dei tasti cursore. 


Come iniziare 


Per attivare Dr. LOGO, si inserisca una copia di Side 1 del pacchetto di dischi master 
nell’unità dischi del computer e si digiti: 


|CPM 


AI prompt A>., si tolga il disco (Side 1) dal drive e si inserisca la copia di lavoro di Side 
3 (DR. LOGO & HELP). 


Per attivare Dr. LOGO si digiti: 


SUBMIT LOGO3 


e dopo alcuni secondi verrà visualizzato il messaggio di inizio “Welcome”, seguito dal 
prompt punto di domanda ?. 


Dr. LOGO per CP/M 2.2 


NOTA. La versione di Dr. LOGO che si trova su Side 4 del pacchetto di dischi master è stata 
fornita nel caso sia necessaria una copia di Dr. LOGO che operi con CP/M 2.2 (usato sui 
modelli AMSTRAD CPC664 e CPC664+DDI1). Di conseguenza non è consigliabile 
. utilizzare la versione di Dr. LOGO di Side 4 sul CPC6128. La versione fornita su Side 3 del 
pacchetto di dischi master è la specifica completa di Dr. LOGO della Digital Research. 


Se si desidera utilizzare comunque la versione di Dr. LOGO per CP/M 2.2 si inserisca una 
copia di Side 4 del pacchetto di dischi master e si digiti: 


|CPM 
AI prompt A> si digiti: 
SUBMIT LOGO2 


e dopo alcuni secondi verrà visualizzato il messaggio di inizio “Welcome”, seguito dal 
prompt punto di domanda ?. 
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Primi passi ... 


Il prompt ? indica che Dr. LOGO è in attesa di istruzioni fornite da tastiera. 
Si digiti (utilizzando lettere minuscole): 


fd 60 


e si vedrà comparire una tartaruga (una grande testa di freccia) che si muove in avanti di 
60 unità lasciando dietro di sè una linea dal punto di partenza fino al punto di arrivo. Lo 
schermo verrà pulito, ottenendo una grande area grafica e una piccola area di testo con 
il prompt ? vicino al margine inferiore dello schermo. 


Dr. LOGO deciderà sovente di riorganizzare lo schermo in modo da poter disporre di una 
grande area di testo o di una grande area grafica, secondo le proprie necessità. 
Si digiti: 
rt 90 
e la tartaruga si girerà di 90 gradi verso destra. 
Si digiti ora: 
fa 60 


e verrà tracciata una seconda linea, della stessa lunghezza ma ad angolo retto rispetto alla 
prima. 


Si provino le semplici istruzioni fd, bk (abbreviazione di ritorno - back) rt (abbreviazione 
di destra - right) ed It (abbreviazione di sinistra - left) per vedere cosa accade sullo 
schermo. 


Procedure di Dr. LOGO 


Una procedura è un elenco di istruzioni che specificano a Dr. LOGO come eseguire un 
compito. 


Probabilmente le prime procedure verranno realizzate accostando quelle già predefinite 
in Dr. LOGO, dette “primitive”. 


fd, bk, rte It sono tutte primitive che si possono sempre usare per costruire blocchi da 
utilizzare nelle proprie procedure. 


Un’altra primitiva predefinita molto utile è cs, che pulisce lo schermo e riporta la tartaruga 
nella sua posizione iniziale. 
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Scrittura di una semplice procedura 
E’ facile vedere che se i movimenti 


fd 60 rt 90 


fossero ripetuti 4 volte ciascuno, verrebbe disegnato un quadrato di lato 60 unità. 


Lo stesso effetto può essere ottenuto con una semplice formula: 


repeat 4 [fd 60 rt 90] 


Si pulisca lo schermo e quindi si provi a digitare questa istruzione per vederne il risultato. 


Per inserire questa formula in una nuova procedura di nome “quadro”, si digiti: 


to quadro 
repeat 4 [fd 60 rt 90] 
end 


Dr. LOGO comprenderà ora “quadro” ed ogni volta che incontrerà il termine “quadro” 
disegnerà un quadrato sullo schermo. Sarebbe stato possibile attribuire a questa proce- 


dura un altro nome, ma è stato scelto “quadro” per ricordarsi dell’operazione eseguita. 
Dr. LOGO permette di digitare insieme diversi comandi, in modo che l’istruzione: 


quadro rt 45 quadro 


disegnerà due quadrati, il secondo dei quali si trova ad un angolo di 45 gradi rispetto al 
primo. 


Procedure con parametri 


E’ possibile realizzare una procedura cui è possibile comunicare “un valore”, esattamente 
allo stesso modo in cui si comunica “un valore” ad una procedura predefinita. Per 
realizzare una procedura che disegna quadrati di lato diverso, è possibile modificare la 
definizione di “quadro” nel modo seguente: 


to quadrovariab :lato 
repeat 4 [fd :lato rt 90] 
end 


Si noti che la variabile :lato inizia con due punti. Questo indica a Dr. LOGO che :lato è 
una variabile e non un comando. 


Quando viene usata la procedura quadrovariab, la variabile :lato deve avere un valore; 
perciò l’istruzione quadrovariab 150 produrrà un quadrato con lati di 150 unità. 
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Si accostino due procedure e si osservi il risultato. Dall’istruzione: 


cs quadrovariab 100 rt 45 quadrovariab 150 


la tartaruga disegnerà due quadrati di lato diverso, uno dei quali posto a 45 gradi rispetto 
all’altro. 


Si noti che Dr. LOGO utilizza un punto esclamativo ! perricordare che un comando è stato 
spezzato su diverse linee dello schermo. 


Uso delle variabili per ricordare valori 


Dr. LOGO permette inoltre di usare le variabili per ricordare valori, oppure per passare 
valori ad una procedura. 


Si definisca una procedura di nome triangolo: 


to triangolo 
repeat 3 [fd :vertice rt 120] 
end 


E’ possibile verificare questa procedura digitando: 


make “vertice 100 
triangolo 


Se si desidera conoscere il valore ricordato da :vertice è sufficiente digitare :vertice dopo 
il prompt ? e Dr. LOGO visualizzerà il valore. 


Infine è possibile utilizzare la variabile :vertice in una nuova procedura per disegnare un 
motivo. Si noti come il valore di :vertice viene incrementato rispetto al suo valore 
precedente, in modo che quando si disegna il motivo, questo si ingrandisce. 


to motivo 

triangolo It 60 triangolo rt 60 
make “vertice :vertice+4 
motivo 

end 

make “vertice 10 

cs motivo 


Quando si è visto a sufficienza, si prema [ESC] per bloccare il programma. 
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Modifica di programmi e procedure 


Dr. LOGO consente di correggere errori di battitura e di modificare procedure definite 
dall’utente. I tasti che devono essere utilizzati sono: 


i tasti cursore î U = > che spostano il cursore di un carattere o di una linea per volta; 


i tasti cursore ff YU > che, premuti insieme al tasto [CONTROL], spostano il cursore in 
alto o in basso di una pagina, e a destra e sinistra di una linea; 


[CLR] che cancella il carattere sotto il cursore, mentre [DEL] cancella il carattere a 
sinistra del cursore; 


[RETURN] che indica a Dr. LOGO che la modifica di una linea di comando è stata 
completata, oppure crea una nuova linea se la procedura è in fase di creazione; 


[ESC] significa abbandonare, mentre [COPY] indica a Dr. LOGO che la realizzazione 
di una procedura è stata terminata. 


Quando si inseriscono comandi o nuove procedure, è sufficiente modificare il testo 
presente sullo schermo. I caratteri verranno inseriti nel testo alla posizione del cursore. 


Per modificare una procedura già esistente si usi il comando "ed" e Dr. LOGO 
visualizzerà la precedente versione della procedura; è quindi possibile utilizzare i metodi 
descritti in precedenza per spostare il cursore sullo schermo e modificare il testo. 
Si modifichi la procedura “motivi” digitando: 

ed “motivi 
Si provi ad usare i tasti di modifica. Se, al termine delle modifiche, si preme [ESC], Dr. 
LOGO abbandonerà ciò che è presente sullo schermo e restituirà la versione originale non 
modificata. 
Si digiti nuovamente ed “motivi, e dopo aver modificato 4 in 8, si prema [COPY] per 


uscire, quindi si riesegua la procedura e si osservi quanto viene visualizzato sullo 
schermo. Si ricordi di inserire il valore iniziale in :vertice. 


Cenni operativi 


Lo spazio di lavoro usato da Dr. LOGO è diviso in nodi. E’ possibile vedere quanti nodi 
sono ancora disponibili digitando: 


nodes 
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Occasionalmente, quando tutti i nodi sono in uso, Dr. LOGO eseguirà una pulizia dello 
spazio di lavoro, e in questo caso la tartaruga si arresterà. Si può chiedere a Dr. LOGO 
di pulire lo spazio di lavoro digitando il comando: 


recycle 


Questo permetterà sovente di proseguire dopo che Dr. LOGO ha comunicato di non 
disporre di altro spazio libero.. 


Se viene usata la versione di Dr. LOGO del CP/M 2.2 (su Side 4 della confezione di dischi 
master), ci si assicuri che sia disponibile sufficiente spazio su disco prima di attivare Dr. 
LOGO, nel caso in cui si desideri memorizzare le procedure su disco. Si può usare il 
comando CAT in AMSDOS (si veda la parte 7 del Corso introduttivo) per verificare la 
quantità di spazio libero su disco. 
Si passi ora ai paragrafi successivi e si provi ad utilizzare alcuni esempi - non si può 
pretendere di capire tutto immediatamente! Durante lo studio di Dr. LOGO si potranno 
utilizzare sempre più comandi. 
AI termine dell’uso di Dr. LOGO si digiti: 

bye 
Riassunto delle primitive di Dr. LOGO 


Il seguente paragrafo riunisce in ordine alfabetico le primitive di Dr. LOGO mostrando 
i dati da fornire, sovente insieme ad un esempio. 


NOTA 


I comandi contrassegnati da un asterisco * NON sono disponibili nella versione 


CP/M 2.2 di Dr. LOGO (su Side 4 del pacchetto di dischi master) e i programmi 
che usano questi comandi non saranno quindi completamente compatibili con il 
CPC664 o il CPC464+DDI!1, che operano sotto CP/M 2.2. 
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Elaborazione di parole e liste: 
(Si noti che nei seguenti esempi vengono mostrati i prompt ? e >). 
ascii 


Restituisce il valore ASCII del primo carattere della parola in ingresso. 


?ascii “G 
71 

?ascii “g 
103 


bf 
Restituisce tutti gli elementi dell’oggetto in ingresso ad eccezione del primo. 


?bf “grosso 
rosso 

?bf [1 23] 
[2 3] 


bl 
Restituisce tutti gli elementi dell’oggetto in ingresso ad eccezione dell’ultimo. 


?bl “grosso 
gross 
?bl [1234] 
[1 23] 


char 
Restituisce il carattere il cui valore ASCII corrisponde al numero in ingresso. 


?char 83 
Ss 
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count 
Restituisce il numero di elementi contenuti nell’oggetto in ingresso. 


?count “sei 

3 

?count [0 1 2 3] 
4 


emptyp 


Restituisce TRUE se l’oggetto in ingresso è una parola vuota o una lista vuota, altrimenti 
restituisce FALSE. 


?emptyp “ 
TRUE 
?emptyp [] 
TRUE 
?emptyp [x] 
FALSE 
?make “x [] 
?emptyp :x 
TRUE 


first 


Restituisce il primo elemento dell’oggetto in ingresso ed elimina le parentesi quadre 
esterne di una lista. 


first “zebra 
Z 
?first [1 23] 
1 


fput 


Restituisce un nuovo oggetto formato unendo il primo oggetto in ingresso al secondo 
oggetto. 


?fput “g “rosso 
grosso 

?fput 1 [2 3] 

[1 23] 
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item 
Restituisce l’elemento specificato dell’oggetto in ingresso. 


?item 4 “gnomo 
m 

* 

last 


Restituisce l’ultimo elemento dell’oggetto in ingresso (si confronti con "first"). 


?last “orizzonte 
e 


* 
lc 


Restituisce la parola in ingresso con tutti i caratteri minuscoli (si confronti con "uc"). 


?lc “SUD 
sud 


list 


Restituisce una lista realizzata con gli oggetti in ingresso, conservando le parentesi 
quadre esterne della lista (si confronti con "se"). 


?(list1234) 

[1 234] 

?list “piedi [grossi] 
[piedi [grossi]] 
?(list) 


* 


listp 
Restituisce TRUE se l’oggetto in ingresso è una lista, altrimenti restiruisce FALSE. 


?listp “madre 

FALSE 

?listp [padre fratello sorella] 
TRUE 
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* 


Iput 


Restituisce un nuovo oggetto formato aggiungendo in fondo al secondo oggetto il primo 
oggetto in ingresso. 


?lput “e “seri 
serie 

?iput “e [seri] 
[seri e] 


* 
memberp 


Restituisce TRUE se il primo oggetto in ingresso è un elemento del secondo oggetto in 
ingresso. 


?memberp “| “solo 

TRUE 

?memberp “cioccolato [[vaniglia][cioccolato][fragola]] 
FALSE 

?memberp [cioccolato] [[vaniglia][cioccolato][fragola]] 
TRUE 


* 
numberp 


Restituisce TRUE se l’oggetto in ingresso è un numero. 


?numberp 374.926 
TRUE 

?numberp “sei 

FALSE 

numberp first [2 4 6 8] 
TRUE 


* 

piece 

Restituisce un oggetto che contiene gli elementi specificati dell’oggetto in ingresso. 
?piece 4 7 “Kensington 
sing 


?piece 2 4 [Nana Gianni Michele Wendy Trilli] 
[Gianni Michele Wendy] 
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se 


Restituisce una lista costituita dagli oggetti in ingresso, eliminando le parentesi quadre 
esterne (si confronti con "list"). 


?make “lista_strum rl 
repeat 4 [fd 50 rt 90] 
?run (se “cs :lista_strum “ht) 


Si noti che il carattere di sottolineatura tra "lista" e "strum" si ottiene premendo [SHIFT] 


e 0. 


* 


shuffle 
Restituisce una lista contenente gli elementi della lista in ingresso in ordine casuale. 


?shuffle [a b c d] 
[cdba] 


* 


uc 


Restituisce la parola in ingresso con tutti i caratteri alfabetici maiuscoli (si confronti con 
lc). 


?uc “jones 
JONES 


* 
where 


Restituisce un numero calcolato dalla più recente espressione memberp con valore 
TRUE. 


?memberp “u “fiume 
TRUE 
?show where 
3 
word 


Restituisce una parola realizzata con le parole in ingresso. 


?word “micro “processore 
microprocessore 
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wordp 

Restituisce TRUE se l’oggetto in ingresso è una parola o un numero. 
?wordp “ciao 
TRUE 


?wordp [] 
FALSE 


Operazioni aritmetiche 


* 
arctan 


Restituisce l’arcotangente (in gradi) del numero in ingresso. 
?arctan 0 
0 


?arctan 1 
45 


cos 
Restituisce il coseno del numero in ingresso in gradi. 


?c0s 60 
0.5 


int 
Restituisce la parte intera del numero in ingresso. 


?int 4/3 
1 


* 
quotient 


Restituisce la divisione intera dei due numeri in ingresso. 


?quotient 14 4 
4 

14/4 

dio 
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random 
Restituisce un numero intero casuale non negativo minore del numero in ingresso. 


random 20 
7 


* 
remainder 


Restituisce il resto intero ottenuto quando il primo numero in ingresso viene diviso per 
il secondo. 


remainder 7 3 
1 
remainder 8 4 
0 


* 
rerandom 


Porta una espressione casuale in successione a riprodurre la stessa sequenza casuale. 


?repeat 10 [(type random 10 char 9)] 
i 3. Sd 2 04 25 
?repeat 10 [(type random 10 char 9)] 
4991 06 13 5 1 
?rerandom 

?repeat 10 [(type random 10 char 9)] 
5 29 9-3 1 bb 28, 7 
?rerandom 

repeat 10 [(type random 10 char 9)] 
52-90 1 bi 2:83. <£ 


* 
round 


Restituisce il numero in ingresso arrotondato all’intero più vicino. 


?round 3.333333 
3 

?round 3.5 

4 
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sin 
Restituisce il seno del numero in ingresso in gradi. 


‘sin 30 
0.5 


+ 
Restituisce la somma dei numeri in ingresso. 


2+22 
4 
22+2 
4 


Restituisce la differenza dei numeri in ingresso. 


?2-105 
5 
?10-5 
5 


»* 


Restituisce il prodotto dei numeri in ingresso. 


Restituisce il quoziente dei numeri in ingresso. 


?/255 
5 
925/5 
5 
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Operazioni logiche: 
and 


Restituisce TRUE se il risultato di tutte le espressioni in ingresso è vero. 


?and (3<4) (7>4) 
TRUE 


not 


Restituisce TRUE se l’espressione in ingresso è falsa. 
Restituisce FALSE se l’espressione in ingresso è vera. 


not (3=4) 
TRUE 
?not (3=3) 
FALSE 


or 


Restituisce FALSE se tutte le espressioni in ingresso sono false. 


?or “TRUE “FALSE 
TRUE 

?or (3=4) (1=2) 
FALSE 


Restituisce TRUE se i due oggetti in ingresso sono uguali, altrimenti restituisce FALSE. 


?= “LOGO “LOGO 
TRUE 

91=2 

FALSE 


> 


Restituisce TRUE se la prima parola in ingresso è maggiore della seconda, altrimenti 
restituisce FALSE. 


?î> 19 20 
FALSE 
220>19 
TRUE 
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< 


Restituisce TRUE se la prima parola in ingresso è minore della seconda, altrimenti 
restituisce FALSE. 


?< 27 13 
FALSE 


?13<27 
TRUE 


Variabili: 
local 


Rende la variabile (o le variabili) citata nell’input accessibile solo alla procedura corrente 
e alle procedure da questa richiamate. 


>(local “x “y “Z) 
make 
Assegna alla variabile citata nell’input il valore dell’oggetto in ingresso. 


?make “lato 50 


?:lato 
50 

* 

namep 


Restituisce TRUE se la parola in ingresso identifica una variabile definita. 


?make “gusto “cioccolato 
?:gusto 

cioccolato 

?namep “gusto 

TRUE 

namep “cioccolato 
FALSE 
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* 
thing 


Restituisce il valore della variabile citata nell’input. 


?make “computer “amstrad 
?thing “computer 
amstrad 


Procedure: 


* 
define 


Assegna al nome della procedura specificata la definizione data dalla lista di definizione 
in ingresso. 


?define “di.ciao [[] [pr “ciao]] 
?po “di.ciao 

to di.ciao 

pr “ciao 

?text “di.ciao 


[I] [pr “ciao]] 
end 


end 


Indica la fine della definizione di una procedura; deve trovarsi da solo all’inizio 
dell’ultima linea. 


to quadro 

>repeat 4 [fd 50 rt 90] 
>end 

quadro defined 
?quadro 


po 


Visualizza la definizione (le definizioni) della procedura (delle procedure) o della 
variabile (delle variabili) specificata. 


?po “quadro 

to quadro 

repeat 4 [fd 50 rt 90] 
end 

?make “x 3 

?po “x 

xis3 
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pots 
Visualizza i nomi e i titoli di tutte le procedure presenti nello spazio di lavoro. 


?pots 


* 
text 


Restituisce la lista di definizione della procedura specificata. 


?to stella ;stella a cinque punte 
>repeat 5 [fd 30 rt 144 fd 30 It 72] 
>end 

stella defined 

?text “stella 

[[] [repeat 5 [fd 30 rt 144 fd 30 It 72]]] 


to 

Indica l’inizio della definizione di una procedura. 
?to quadro 
>repeat 4 [fd 50 rt 90] 


>end 
quadro defined 


Editing: 
ed 


Carica la procedura (le procedure) e/o la variabile (le variabili) nel buffer dell’editor di 
schermo. 


?ed “quadro 


* 


edall 


Carica tutte le variabili e le procedure nello spazio di lavoro nel buffer dell’editor di 
schermo e lo attiva. 


?edall 
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* 


edf 


Carica il file di disco specificato nel buffer dell’editor di schermo direttamente da disco, 
oppure crea un nuovo file ed attiva l’editor di schermo con un buffer vuoto. 


?edf “stella 


Funzioni di stampa: 


* 
copyon 


Inizia ad inviare testo alla stampante. 


?copyon 


* 


copyoff 
Interrompe l’invio di testo alla stampante. 


?copyoff 
Schermo di testo: 


ct 


Cancella tutto il testo contenuto nella finestra che contiene attualmente il cursore, quindi 
posiziona il cursore nell’angolo superiore sinistro della finestra. 


?et 


* 
cursor 


Restituisce una lista di coordinate che contiene i numeri di colonna e di linea della 
posizione del cursore all’interno della finestra di testo. 


Pet 

?cursor 

[O 1] 

?(type [La posizione corrente del cursore e’\] show cursor 
La posizione corrente del cursore e’ [32 23] 
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pr 


Visualizza l’oggetto (gli oggetti) in ingresso sullo schermo di testo, eliminando le 
parentesi quadre esterne, inserendo un carattere di ritorno carrello alla fine dell’ultimo 
ingresso (si confronti con "show" e "type"). 


?pr [a b c] 
abc 

* 

setcursor 


Posiziona il cursore alla posizione specificata dalla lista di coordinate relative allo 
schermo di testo fornite in ingresso. 


?et 

?to figura 

>make “x random 20 
>make “y random 12 
>setcursor list :x :y pr 
>end 

figura 


soi 


setsplit 
Assegna il numero di linee dello schermo di split. 
?setsplit 10 
show 
Visualizza l’oggetto in ingresso sullo schermo di testo, senza eliminare le parentesi 
quadre esterne e inserendo un carattere di ritorno carrello alla fine dell’ultimo ingresso 


(si confronti con "pr" e "type"). 


?show [a b c] 
[a bc] 


ts 


Seleziona uno schermo di testo intero. 


?ts 
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type 
Visualizza l’oggetto (gli oggetti) in ingresso sullo schermo di testo, eliminando le 


parentesi quadre esterne, ma non inserisce un carattere di ritorno carrello alla fine 
dell’ultimo oggetto in ingresso (si confronti con "pr" e "show"). 


?type [a b c] 
abc 


Schermo grafico: 


Si noti che lo schermo è in Modo 1, con quattro colori disponibili, e che viene usato lo 
stesso sistema di coordinate del BASIC AMSTRAD. In altre parole tutte le posizioni 
dello schermo verranno arrotondate al più vicino punto dello schermo con numerazione 
pari. I colori rosso, verde e blu possono assumere i valori 0, 1 o 2. 


clean 
Cancella lo schermo grafico senza effetti sulla tartaruga. 


?fd 50 
?clean 


cs 


Cancella lo schermo grafico e posiziona la tartaruga in [0,0], rivolta verso 0 (nord) con 
la penna abbassata. 


rt 90 fd 50 
?cs 


dot 


Disegna un punto nella posizione specificata dalla lista di coordinate in ingresso nel 
corrente colore della penna. 


?dot [50 10] 
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* 
dotc 


Restituisce il numero di colore del punto corrispondente alla lista specificata di coordi- 
nate, oppure -1 se la locazione non si trova sullo schermo. 


?cs 

?setpc 1 
?dot [-50 50] 
?setpc 2 
?dot [50 50] 
?setpc 3 
?dot [50 -50] 
?dotc [50 50] 
2 


?dotc [-50 -50] 


0 
?dotc [1000 3000] 
A 


fence 


Stabilisce un limite sullo schermo grafico visibile che la tartaruga non può superare. 
window elimina questo confine. 


fence 
fd 300 
Turtle out of bounds 
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fs 
Seleziona uno schermo grafico intero. 


is 
pal 


Restituisce i numeri che rappresentano la quantità di colore rosso, verde e blu assegnata 
ad una penna. 


?pal 2 
[0 2 2] 


* 


setbg 


Assegna allo sfondo dello schermo grafico il colore assegnato al numero di colore in 
ingresso. 


Isf 
[0 SS 5 FENCE 1] 


(In questo modo allo sfondo è assegnato il valore zero). 


?pal 0 

[0 0 1] 

?setbg 2 

?sf 

[2 SS 5 FENCE 1] 


setpal 


Assegna alla penna il colore della tavolozza. Assegna ad una penna una data quantità di 
rosso, verde e blu. 


?setpal 3 [1 1 2] 
?pal 3 
[1172] 
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* 


setscrunch 


Assegna al rapporto dimensionale dello schermo grafico il numero in ingresso. 


?8f 

[0 SS 5 FENCE 1] 
?to cerchio 
>repeat 360 [fd 1 rt 1] 
>end 

cerchio defined 
?setscrunch 2 

?8f 

[0 SS 5 FENCE 2] 
?cerchio 
’?setscrunch 2.5 
?cerchio 


sf 


Restituisce informazioni relative allo schermo grafico. Il formato è: [<coloresf> <stato- . 
schermo> <dimens-split> <stato-finestra> <scrunch>], dove <coloresf> è il numero di 
penna dello sfondo (sempre 0 sotto CP/M 2.2); <stato-schermo> indica SS (schermo 
suddiviso), FS (schermo pieno - full screen) o TS (schermo di testo); <dimens-split> è il 
numero di linee di testo visualizzate sulla finestra di testo dello schermo; infine <stato- 
finestra> indica il modo WINDOW, WRAP o FENCE. <scrunch> è il rapporto 
dimensionale dello schermo, con valore per difetto 1. Può essere modificato mediante il 
comando setscrunch (non disponibile sotto CP/M 2.2). 


Isf 
[0 SS 5 FENCE 2.5] 
SS 


Visualizza una finestra di testo sullo schermo grafico. 
?ss 


window 


Consente alla tartaruga di disegnare all’esterno dello schermo grafico visibile dopo una 
espressione fence o wrap. 


?fence fd 300 
Turtle out of bounds 
?window 

?fd 300 


Introduzione a LOGO Capitolo 6 Pagina 25 


wrap 


Fa riapparire la tartaruga dalla parte opposta dello schermo grafico quando si supera il 
limite. 


?cs wrap 

?rt 5 fd 1000 
?cs window 
?rt 5 fd 1000 


Grafica con la tartaruga: 


bk 


Sposta la tartaruga per il numero di passi fornito nell’ingresso in direzione opposta a 
quella della freccia. 


?cs fd 150 
?bk 50 


fd 


Sposta la tartaruga per il numero di passi fornito nell’ingresso nella stessa direzione della 
freccia. 


?fd 80 


* 
home 


Riporta la tartaruga alla posizione [0,0] (il centro dello schermo grafico) rivolta verso 0 
(nord). 


?fd 100 
?rt 45 

?fd 100 
?home 
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ht 
Rende invisibile la tartaruga; velocizza e rende più chiari i disegni. 


?ht 
?cs fd 50 
?st 


It 

Ruota la tartaruga verso sinistra per il numero di gradi specificati. 
?it 90 

pd 

Appoggia la penna della tartaruga, che riprende a disegnare. 


?fd 20 pu fd 20 
?pd 
?fd 20 


pe 


Modifica il colore della penna della tartaruga e lo rende uguale al colore dello sfondo. La 
tartaruga cancella le linee tracciate. 


?fd 50 
?pe 

?bk 25 
?fd 50 
?pd fd 25 


pu 
Solleva la penna della tartaruga, che smette di disegnare. 


?fd 30 
?pu 

?fd 30 
?pd fd 30 
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px 


La tartaruga scambia il colore di tutti i pixel precedentemente colorati durante il suo 
| passaggio con il colore inverso o con il complemento logico del colore. 


?fd 20 pu fd 20 
?pd setpc 3 fd 20 
?px 
?bk 80 
?fd 80 
?pd bk 100 
rt 
Ruota la tartaruga verso destra per il numero di gradi specificati nell’ingresso. 


?rt 90 
seth 
Ruota la tartaruga verso la direzione assoluta specificata dal numero di gradi in ingresso; 
inumeri positivi ruotano la tartaruga in senso orario; i numeri negativi ruotano la tartaruga 
in senso antiorario. 
?seth 90 
setpc 
Assegna alla penna della tartaruga il colore specificato dal numero in ingresso. 
?setpc 1 
setpos 


Muove la tartaruga fino alla posizione specificata nella lista di coordinate in ingresso. 


?setpos [30 20] 
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* 
setx 


Muove la posizione orizzontale della tartaruga alla coordinata x specificata dal numero 
in ingresso (si veda anche "sety"). 


?setx 80 
?fd 100 
?setx -50 
?fd 50 

* 

sety 


Muove la posizione verticale della tartaruga alla coordinata y specificata dal numero in 
ingresso (si veda anche "setx"). 


?sety 80 
?fd 100 
?sety -50 
fd 50 


st 
Rende visibile la tartaruga, se nascosta. 


?ht 
?fd 50 
Ist 


tf 


Restituisce informazioni relative alla tartaruga. Il formato è: [<xcor> <ycor> <direz> 
<statopenna> <colorepenna n> <visibile>], dove <xcor> è la coordinata x della tartaruga; 
<ycor> è la coordinata y della tartaruga; <direz> indica la direzione di bussola verso cui 
è orientata la tartaruga; <visibile> è TRUE se la tartaruga è visibile; <statopenna> indica 
PD (penna giù), PE (cancellazione), PX (scambio di penna) o PU (penna sù). Infine 
<colorepenna n> identifica il numero di penna. 


?setpos [15 30] 
rt 60 

?setpc 3 

?pe 

?ht 
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Nf 
[15 30 60 PE 3 FALSE] 


towards 


Restituisce una direzione che renderebbe la tartaruga orientata verso la posizione 
specificata nella lista delle coordinate. 


?seth towards list :x :y 
Gestione dello spazio di lavoro: 
er 
Cancella la procedura o le procedure specificate dallo spazio di lavoro. 


?er “quadro 


* 

erall 

Cancella tutte le procedure e le variabili dallo spazio di lavoro. 
?erall 

ern 


Cancella la variabile o le variabili specificate dallo spazio di lavoro. 


?make “lato [100] 
?make “angolo [45] 
?:lato :angolo 
[100] 

[45] 

?ern [lato angolo] 
?:lato 

lato has no value 


nodes 


Restituisce il numero di nodi liberi nello spazio di lavoro. 
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‘înodes 
noformat 


Elimina la formattazione delle procedure, insieme ai commenti, dallo spazio di lavoro per 
liberare un maggior numero di nodi. 


?noformat 


* 


poall 
Visualizza le definizioni di tutte le procedure e le variabili presenti nello spazio di lavoro. 


?poall 


* 
pons 


Visualizza i nomi e i valori di tutte le variabili globali nello spazio di lavoro. 


?pons 
medium is 40 
small is 20 
large is 80 


* 


pops 

Visualizza i nomi e le definizioni di tutte le procedure nello spazio di lavoro. 
?pops 

recycle 

Libera il maggior numero possibile di nodi e riorganizza lo spazio di lavoro. 


?recycle 
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?nodes 
Liste di proprietà: 
glist 


Restituisce una lista di tutti gli oggetti nello spazio di lavoro che possiedono il nome della 
proprietà indicata nelle loro liste di proprietà. 


?glist “DEF 
Sprop 


Restituisce il valore della proprietà del nome della proprietà indicata relativo all’oggetto 
citato nell’input. i 


?make “altezza “72 
?gprop “altezza “ APV 
72 


plist 
Restituisce la lista delle proprietà dell’oggetto citato nell’input. 


?plist “altezza 
[.APV 72] 


pprop 


Inserisce la coppia della proprietà in ingresso nella lista delle proprietà dell’oggetto citato 
nell’input. 


?pprop “master “APV “Scott 
?:master 
Scott 


* 
PPS 


Visualizza le coppie di proprietà non standard di tutti gli oggetti presenti nello spazio di 
lavoro. 


?pprop “Sally “extension 213 
?pps 
Sally's extension is 213 
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?plist “Sally 
[extension 213] 
remprop 
Cancella la proprietà specificata dalla lista delle proprietà dell’oggetto citato nell’input. 


?remprop “master “.APV 


File di disco: 


* 
changef 


Modifica il nome di un file in una direttrice di disco. 


?dir 

[QUADRO CERCHIO STELLE] 
?changef “scatole “quadro 

?dir 

[SCATOLE CERCHIO STELLE] 


* 


defaultd 
Restituisce il nome della corrente unità dischi per difetto. 


?defaultd 
A: 


dir 


Restituisce una lista dei nomi di file di Dr. LOGO sul disco per difetto o specificato; 
accetta anche caratteri jolly. 
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(Si consulti la parte 1 del capitolo “AMSDOS e CP/M” per l’uso dei caratteri jolly 
* 
dirpic 


Restituisce una lista di nomi di file di disegni che si trovano sul disco per difetto o 
specificato. Accetta anche nomi di file ambigui. 


?dirpic “b: 
[MIO_DIS QUADRI STELLE NOTE] 


load 
Legge da disco il file citato nell’input e lo carica nello spazio di lavoro. 


?load “miofile 
?load “b:forme 


* 


loadpic 
Ricrea il disegno, salvato nel file di disegno citato nell’input, sullo schermo grafico. 


?loadpic “mio_dis 
?loadpic “b:mio_dis 


save 

Scrive il contenuto dello spazio di lavoro sul file di disco specificato nell’ingresso. 
?save “forme 

NOTA: Prima della memorizzazione si inserisca un disco formattato con spazio libero 

sufficiente per il file che si desidera salvare. Non salvare file sul disco master di sistema: 

in effetti non si dovrebbe MAI rischiare di scrivere su questo disco, perciò è consigliabile 


chiudere le tacche di protezione scrittura. 


Se si sta usando la versione di Dr. LOGO per CP/M 2.2 (Side 4 del pacchetto di dischi 
master) non è possibile cambiare dischi durante la sessione, perciò è necessario che il 
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disco di lavoro per la versione CP/M 2.2 di Dr. LOGO abbia sufficiente spazio libero per 
i programmi. 
* 


savepic 
Scrive il contenuto dello schermo grafico sul file di disegno specificato nell’ingresso. 


?savepic “mio_dis 
?savepic “b:io_dis 


NOTA: Prima della memorizzazione si inserisca un disco formattato con spazio libero 
sufficiente per il file che si desidera salvare. Non salvare file sul disco master di sistema: 
in effetti non si dovrebbe MAI rischiare di scrivere su questo disco, perciò è consigliabile 
chiudere le tacche di protezione scrittura. 


Se si sta usando la versione di Dr. LOGO per CP/M 2.2 (Side 4 del pacchetto di dischi 
master) non è possibile cambiare dischi durante la sessione, perciò è necessario che il 
disco di lavoro per la versione CP/M 2.2 di Dr. LOGO abbia sufficiente spazio libero per 
i programmi. 


* 
setd 


L’unità dischi specificata diventa l’unità per difetto. 


?defaultd 

A: 

?dir 

[SCATOLE CERCHIO STELLE] 
?setd “b: 

?defaultd 

B: 


2dir 
[TRIANGOLO CASA] 


Tastiera e joystick: 


buttonp 


Restituisce TRUE se viene premuto il pulsante del joystick specificato; i due possibili 
joystick vengono identificati dai numeri 0 e 1. 


?to fuoco 

>label “ciclo 

>if (buttonp 0) [pr [fuoco 0!]] 
>if (buttonp 1) [pr [fuoco 11/]] 
>go “ciclo 

>end 
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La posizione del joystick viene controllata da "paddle". 
keyp 


Restituisce TRUE se è stato digitato un carattere alla tastiera ed è in attesa di essere letto. 


?to inkey 


>if keyp [op rc] [op ‘] 
>end 


paddle 


Restituisce lo stato del joystick 0 o 1. Le posizioni dei joystick sono indicate nel modo 
seguente: 


Valore restituito Significato 


255 Nessuna pressione 

0 Verso l’alto 

1 Verso l’alto e a destra 

2 Verso destra 

3 Verso il basso e a destra 
4 Verso il basso 

R) Verso il basso e a sinistra 
6 Verso sinistra 

7 Verso l’alto e a sinistra 


?paddle 0 
255 


I pulsanti di fuoco vengono controllati da "buttonp". 
re 
Restituisce il primo carattere digitato alla tastiera. 


?make “tasto rc 


quindi si prema il tasto X 
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?:tasto 
X 
rl 


Restituisce una lista che contiene una linea digitata alla tastiera. L’ingresso deve essere 
seguito da un carattere di ritorno carrello. 


?make “lista_strum rl 
repeat 4 [fd 50 rt 90] 
?:lista_strum 

[repeat 4 [fd 50 rt 90]] 


rq 


Restituisce una parola che contiene una linea digitata alla tastiera. L'ingresso deve essere 
seguito da un carattere di ritorno carrello. 


?make “comando rq 
repeat 3 [fd 60 rt 120] 


?:comando 
repeat 3 [fd 60 rt 120] 


Suono: 


I comandi di suono sono caratteristici dell’implementazione AMSTRAD di Dr. LOGO 
e risultano simili alla loro controparte BASIC AMSTRAD. 


Per maggiori informazioni si faccia riferimento alla parte 9 del Corso introduttivo. 
sound 
Inserisce un suono nella coda. Il formato è: [<stato canale> <periodo tono> <durata> 
<volume> <inviluppo volume> <inviluppo tono> <rumore>]. I parametri successivi alla 
durata sono opzionali. 

?sound [1 20 50] 


env 


Assegna un valore all’inviluppo di volume. Il formato è: [<numero inviluppo> <sezione 
inviluppo>]. 
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?env [1 100 2 20] 
?sound [1 200 300 5 1] 
ent 


Assegna un valore all’inviluppo di tono. Il formato è: [<numero inviluppo> <sezione 
inviluppo>]. 


?ent [1 100 2 20] 
?sound [1 200 300511] 


release 


Rilascia i canali di suono che sono stati posti in uno stato di blocco da un comando sound. 
I canali che devono essere rilasciati vengono indicati nel modo seguente: 


Valore ingresso Canali rilasciati. 


0 Nessuno 
1 A 

2 B 

3 AeB 

4 C 

) AeCc 

6 BeC 

7 AeBeC 


?release 1 

Flusso di controllo: 

bye 

Termina la corrente sessione di Dr. LOGO. 
?bye 

co 


Chiude una pausa provocata da [CONTROL]Z, "pause" o ERRACT. 
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?c0 
go 


Esegue la linea all’interno della procedura corrente che segue una espressione label 
insieme alla stessa parola di ingresso. 


?go “ciclo 
if 


Esegue una delle due liste di istruzioni in base al valore dell’espressione in ingresso. Le 
istruzioni in ingresso devono essere liste letterali racchiuse tra parentesi quadre. 


>if (a>b) [pr [a e’ piu’ grande]] 
>[pr [b e’ piu’ grande]] 


label 


Identifica la linea che deve essere eseguita dopo una espressione go con la parola in 
ingresso. 


>label “ciclo 
op 


Rende l’oggetto in ingresso l’uscita della procedura e termina in quel punto l’esecuzione 
della procedura. 


?op [result] 
repeat 


Esegue la lista di istruzioni in ingresso un numero di volte specificato. 
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?repeat 4 [fd 50 rt 90] 
run 


Esegue la lista di istruzioni in ingresso. 


?make “lista_strum [fd 40 rt 90] 
?run :lista_strum 


stop 


Termina l’esecuzione della procedura corrente e ritorna a TOPLEVEL (il prompt ?) 
oppure alla procedura chiamante. 


?stop 
wait 


Interrompe l’esecuzione della procedura per un periodo di tempo specificato dal numero 
in ingresso. Il tempo è = numero in ingresso * 1/60 secondi. 


?wait 200 
Trattamento delle eccezioni: 


catch 


Rileva gli errori e le condizioni particolari che si verificano durante l’esecuzione della 
lista di istruzioni in ingresso. 


>catch “errore [+ [] [] 
>pr [Sono qui] 
Sono qui 


error 


Restituisce una lista i cui elementi descrivono l’errore più recente. 
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catch “errore [esegui.fino.errore] 
show errore 


* 
notrace 
Disattiva il tracciamento dell’esecuzione della procedura (si veda "trace"). 


‘?notrace 


* 
nowatch 


Disattiva l’osservazione di tutte le procedure o delle procedure specificate (si veda 
watch). 


?nowatch 
pause 


Sospende l’esecuzione della procedura corrente per consentire l’interazione con l’inter- 
prete o l’editor. 


>if :lato>5 [pause] 
throw 
Esegue la linea identificata dal nome in ingresso in una precedente espressione catch. 


?throw “TOPLEVEL 


* 
trace 


Attiva il tracciamento dell’esecuzione di una procedura. 


?trace 


* 
watch 


Attiva l’osservazione di tutte le procedure o delle procedure specificate. 
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?watch 
Primitive di sistema: 


.contents 
Visualizza il contenuto dello spazio di simboli di Dr. LOGO. 
.deposit 


Inserisce il secondo numero in ingresso nella locazione assoluta di memoria specificata 
dal primo numero in ingresso. 


.examine 


Visualizza il contenuto della locazione assoluta di memoria specificata. 


* 
.in 


Recupera il corrente valore della porta di ingresso specificata. 


* 
.out 


Invia il valore in ingresso alla porta di uscita specificata. 
Variabili di sistema: 
ERRACT 


Quando ha valore TRUE provoca una pausa al verificarsi di un errore, quindi ritorna a 


TOPLEVEL. 


FALSE 
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Valore di sistema. 
REDEFP 


Quando ha valore TRUE permette di ridefinire le primitive. 
TOPLEVEL 

throw “TOPLEVEL permette di uscire da tutte le procedure in sospeso. 
TRUE 

Valore di sistema. 

Proprietà di sistema: 

.APV 

Valore di proprietà associato; è il valore di una variabile globale. 

.DEF 


Definizione di una procedura. 


* 


.ENL 


Fine di una linea di procedura spezzata da un carattere di ritorno carrello o da spazi. 


* 
.EMT 


Inizio di una linea di procedura spezzata da un carattere di ritorno carrello e da spazi. 


* 
.PRM 


Identifica una primitiva. 


* 


.REM (0 ;) 


Osservazioni o commenti. 
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Capitolo 7 
Riferimenti 


Questo capitolo fornisce la maggior parte delle informazioni di 
riferimento che è probabile occorreranno imparando ad utilizzare 
questo computer. 


Argomenti esaminati: 


* Posizione del cursore ed estensione dei codici di controllo 
* Interruzioni (Interrupts) 

* Caratteri ASCII e grafici 

* Riferimenti ai tasti 

* Suono 

* Messaggi di errore 

* Parole chiave del BASIC 

* Tabelle 

* Collegamenti 

* Stampanti 

* Joystick 

* Organizzazione dei dischi 

* RSX (Resident System eXtensions) 
* Memoria 

* Emulatore di terminale di CP/M Plus 
* Set di caratteri di CP/M Plus 


Per una guida completa al BASIC ed al firmware del CPC6128, consultare i manuali 
AMSTRAD. 


Parte 1: Posizione del cursore ed estensione dei codici di 
controllo mediante BASIC 


In molti programmi applicativi, il cursore del testo può essere posizionato all’esterno 
della finestra attuale. Varie operazioni costringeranno il cursore ad una posizione lecita: 
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1. Scrivere il carattere 

2. Disegnare il cursore 

3. Eseguire i codici di controllo segnati da un asterisco nella lista che segue. 
La procedura che porta il cursore in una posizione lecita è la seguente: 


1. Se il cursore è a destra del margine destro, viene portato alla colonna più a sinistra della 
linea seguente. 


2.Seilcursore è a sinistra del margine sinistro, viene portato alla colonna più a destra della 
linea precedente. 


3. Se il cursore è sopra il margine superiore, la finestra viene fatta scorrere di una linea 
ed il cursore viene portato sulla riga più in alto nella finestra. 


4. Se il cursore è sopra il margine inferiore, la finestra viene fatta scorrere di una linea ed 
il cursore viene portato sulla riga più in basso nella finestra. 


I controlli e le operazioni vengono effettuate esattamente nell’ordine riportato. Le 
posizioni illegali del cursore possono essere uguali a zero o negative che si trovano a 
sinistra o al di sopra dello schermo. 


I caratteri tra 0 e 31 inviati allo schermo non producono un carattere ma vengono 
interpretati come codici di controllo (e come tali non devono essere impiegati a 
sproposito). Alcuni codici modificano il significato dei caratteri seguenti che costitui- 
scono i parametri del codice. 


Un codice di controllo inviato allo schermo grafico stamperà semplicemente il simbolo 
collegato alla sua funzione se acceduta tramite tastiera (ad esempio &07 “BEL” - [CTRL] 
G). Eseguirà invece la sua funzione di controllo se indirizzato usando il comando: 


PRINT CHR$(&07) o PRINT (dove il simbolo è ottenuto premendo [CTRL] 
G all’interno dell’istruzione PRINT. 


I codici indicati da un asterisco (*) costringono il cursore ad una posizione lecita nella 
finestra corrente prima di essere eseguiti ma possono lasciare il cursore in una posizione 
nonlecita. I codici ed il loro significato sono descritti prima dal loro valore in esadecimale 
(&XX) e poi dal corrispondente decimale. 
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Caratteri di controllo BASIC 


Valore Nome Parametro 


&00 0 NUL 


&01 1 SOH da 0 a 255 


da 0 a 255 


Riferimenti 


Significato 
Nessun effetto. Ignorato 


Stampa il simbolo indicato dal parame- 
tro. Permette di visualizzare i simboli 
tra0e 31. 


Elimina il cursore del testo. Equivale al 
comando CURSOR con parametro = 0. 


Riattiva il cursore del testo. Equivale al 
comando CURSOR con parametro = 1. 
Notare che per visualizzare un cursore 
da un programma BASIC (che non sia il 
cursore automatico generato quando il 
BASIC attende un input da tastiera), 
deve essere usato il comando CURSOR 
con parametro l. 


Fissa la modalità di schermo. Parame- 
tro MOD 4. Equivalente al comando 
MODE. 


Invia il carattere indicato dal parametro 
allo schermo grafico. 


Abilita lo schermo di testo (Vedere 
&015 NAK) 


Emette un Bip. Svuota le code relative 
ai suoni. 


Sposta il cursore indietro di un caratte- 
re. 
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Nome Parametro Significato 
* TAB Sposta il cursore avanti di un carattere. 


* LF Sposta il cursore verso il basso di una 
linea. 


* VT Sposta il cursore verso l’alto di una 
linea. 


FF Cancella la finestra di testo e porta il 
cursore nell’angolo in alto a sinistra. 
Equivale al comando CLS. 


Porta il cursore sul primo carattere a 
sinistra della stessa linea. 


da 0a 15 Fissa il colore della carta. Parametro 
MOD 16. Equivale al comando PA- 
PER. 


da 0 a 15 Fissa il colore della penna. Parametro 
MOD 16. Equivale al comando PEN. 


Cancella il carattere corrente. Riempie 
la griglia che costituisce il carattere 
con il colore della carta. 


Cancella la linea dal margine sinistro 
della finestra fino alla posizione (inclu- 
sa) del cursore. Riempie le posizioni 
interessate con il colore della carta. 


Cancella la linea dalla posizione (inclu- 
sa) del cursore al margine destro della 
finestra. Riempie le posizioni interes- 
sate con il colore della carta. 


Cancella il contenuto della finestra fino 
alla posizione del cursore. Riempie le 
posizioni interessate con il colore della 
carta. 
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Valore Nome Parametro Significato 


&14 20 * DC4 Cancella il contenuto della finestra 
dalla posizione del cursore in poi. 
Riempie le posizioni interessate con il 
colore della carta. 


Disattiva lo schermo di testo. Lo scher- 
mo non reagirà ad alcun comando ad 
esso inviato fino alla ricezione di un 
carattere ACK (&06 6). 


Parametro MOD 2. Opzione Traspa- 
renza. 0 disabilita 1 abilita. 


Parametro MOD 4. 

0 fissa il normale modo grafico 
1 fissa il modo grafico XOR 

2 fissa il modo grafico AND 

3 fissa il modo grafico OR 


Scambia i colori di carta e penna. 


da 0 a 255 Riempie la matrice di un carattere defi- 
da 0 a 255 nibile dall’utente. Equivale al comando 
da 0 a 255 SYMBOL. Prende 9 parametri. Il pri- 
da 0 a 255 mo indica il carattere da riempire. Gli 
da 0 a 255 altri 8 specificano la matrice. Il bit più 
da 0 a 255 significativo del primo byte corrispon- 
da 0 a 255 de al pixel in alto a sinistra della cella 
da 0 a 255 del carattere, il bit meno significativo 
da 0 a 255 dell’ultimo byte corrisponde al pixel in 

basso a destra della cella del carattere. 


SUB da 1 a 80 Fissa la finestra. Equivale al comando 
da 1a 80 WINDOW. I primi due parametri spe- 
da 1 a 25 cificano i margini sinistro e destro della 
da 1a 25 finestra (il valore più piccolo viene con- 

siderato il margine sinistro, il più gran- 
de il margine destro). Gli altri due  pa- 

. rametri specificano i margini superiore 
ed inferiore della finestra (il valore più 
piccolo viene considerato il margine 
superiore, il più grande il margine infe- 
riore). 
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Valore Parametro Significato 
&1B 27 Nessun effetto. Ignorato. 


&1C 28 da 0 a 15 Fissa l’inchiostro ad una coppia di colo- 
da 0a31 ri. Equivale al comando INK. Il primo 
da0a31 parametro (MOD 16) specifica l’in- 

chiostro, gli altri due (MOD 32) i colori 
richiesti. I valori compresi tra 27 e 31 
corrispondono a colori non definiti. 


da 0a31 Fissa il bordo ad una coppia di colori. 

da 0a31 Equivale a comand BORDER. I due 
parametri (MOD 32) specificano i due 
colori. I valor compresi tra 27 e 31 
corrispondono a colori non definiti. 


Porta il cursore nella posizione in alto a 
sinistra della finestra. 


da 0 a 80 

da 0a25 Porta il cursore nella posizione indicata 
nella finestra corrente. Equivale al co- 
mando LOCATE. Il primo parametro 
costituisce la colonna su cui portarsi, il 
secondo corrisponde alla linea. 


La gestione del 6128 è dotata di un sofisticato sistema operativo in tempo reale. Il sistema 
operativo “dirige il traffico” tra input ed output. 


Innanzitutto fornisce l’interfaccia tra l’hardware e l’interprete BASIC (ad esempio nel 
caso del colore lampeggiante, dove il BASIC passa semplicemente dei parametri ed il 
sistema operativo esegue l’ordine; in tal modo una parte decide cosa deve essere fatto e 
l’altra come ciò deve essere fatto. 


Il sistema operativo della macchina è conosciuto generalmente come il “firmware” ed è 
composto dalle routine in codice macchina chiamate dai comandi ad alto livello del 
BASIC. 
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Se si è tentati di fare delle POKE negli indirizzi della memoria della macchina o effettuare 
delle CALL alle subroutine, è conveniente salvare prima il programma contenuto in 
memoria; dopo tali operazioni è possibile perderlo. Le grandi potenzialità del firmware 
contenente il sistema operativo del 6128 sono descritte in SOFT 968; la loro spiegazione 
va oltre lo scopo del manuale introduttivo. 


Se si intende utilizzare molto il linguaggio macchina, sarà necessario utilizzare un 
assemblatore (assembler). L’assembler DEVPAC della AMSTRAD contiene un assem- 
bler rilocabile Z80, un editor, un disassembler ed un monitor. 


Parte 2: Interrupts (Interruzioni) 


Il 6128 fa un uso estensivo degli interrupt dello Z80 e fornisce un sistema operativo che 
include molte possibilità di multi-tasking, esemplificate dalle strutture AFTER e 
EVERY descritte precedentemente in questo manuale. La precedenza degli eventi è: 


Break ([ESC][ESC]) 

Timer 3 

Timer 2 (e le tre code del suono) 
Timer 1 

Timer 0 


Le interruzioni dovrebbero essere incluse solo dopo aver considerato le conseguenze dei 
possibili stati intermedi delle variabili al momento dell’interruzione. La stessa sub- 
routine di interruzione dovrebbe evitare interazioni indesiderate con lo stato delle 
variabili del programma principale. 


Le code del suono hanno interruzioni indipendenti di uguale priorità. Quando inizia una 
interruzione del suono non può essere interrotta da nessun’altra interruzione del suono. 
Ciò permette di far condividere le variabili alle routine di interruzione del suono senza 
che sorga alcun problema. 


Quando l’interruzione di una coda del suono è abilitata (usando ON SQ GOSUB), agirà 
immediatamente se la coda del suono di quel canale non è piena, altrimenti agirà quando 
termina il suono attualmente prodotto e si crea uno spazio nella coda. L’interruzione dis- 
abiliterà l’evento, in modo che la sub-routine possa riabilitarsi se sono richieste altre 
interruzioni. 


Cercando di produrre un suono o controllando lo stato della coda si disabilita una 
interruzione del suono. 
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Parte 3: Caratteri ASCII e grafici del BASIC 


ASCII 

La tabella riportata illustra il normale insieme di caratteri ASCII usando la notazione 
decimale, ottale ed esadecimale, oltre ai codici ASCII dove sia il caso. Ognuna delle celle 
dei caratteri del 6128 viene rappresentata in dettaglio nelle pagine seguenti. 


OTT ESA Caratteri ASCII DEC OTT ESA ASCII DEC OTT ESA ASCII 


NUL ((CTRLJ9) 062 
SOH (ICTRLIA) 063 
STX (CTRUB) 064 
ETX ([CTRL]C) 065 
EOT ([CTRL]D) 066 
ENQ (ICTRLJE) 067 
ACK ([CTRLJF) 070 
BEL (CTRL]G) 071 
BS (ICTRL]H) 072 
HT ([CTRL]I) 073 
LF (CTRL) 074 
VT (CTRL]K) 075 
FF (ICTRLIL) 076 
CR ([CTRL]M) 077 
SO (ICTRLIN) 100 
SI (CTRLJO) 101 
DLE (ICTRLIP) 102 
DC1 ([CTRL]O) 103 
DC2 ((CTRLJR) 104 
DC3 ((CTRLJS) 105 
DC4 ((CTRLIM 106 
NAK ([CTRLJU) 107 
SYN (CTRL 110 
ETB (ICTRLIM 111 
112 
113 
114 
115 
116 
117 
120 
121 
122 
123 
124 
125 
126 
127 
130 
131 
132 
133 
134 
135 
136 
137 
140 
141 
142 
143 


ita 
(©) 
LEEIHALLER 


CAN ([CTRL]X) 
EM ([CTRLJY) 
SUB (ICTRLJZ) 
ESC 


te  ANXNXEKTCC1A019302000535-_ rr ——_ 70 4A 0 


In +1t%*0nn -O9rxtA* 
1140 MN<XECZCHYVDDOVOZECKAHIONMONGBPQO-dV i AN 00 YAUIALII 


ELIEKLESCLEBZIERPE8R 


ami: 
(eos) 
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Set di caratteri grafici BASIC specifici per la macchina 


I caratteri qui riprodotti vengono riportati su una normale 
matrice 8 x 8 usata per la scrittura sullo schermo del 6128. I 
caratteri definibili dall’utente possono essere riuniti per 
ottenere speciali effetti, ponendoli uno in fianco all’altro. 
Vedere la parte “Caratteri definibili dall’utente” nel Capitolo 
“A vostra disposizione ...”. 


35 
&H23 
&X00100011 


37 
&H25 
&X00100101 


&H27 


42 
&H2A &H2B 
&X00101010 


LOD 
n 

36 

&H24 

&X00100100 


&H28 


&H2C 
&X00101100 


(IL | 

&H2D &H2E &H30 

&X00101101 &X00101110 &X00101111 &X00110000 
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49 50 51 52 


&H31 &H32 &H33 &H34 
&X00110001 &X00110010 &X00110011 &X00110100 

n 

| 

_] 

53 54 
&H35 &H36 &H37 &H38 
&X00110101 &X00110110 &X00111000 


&H39 &H3B &H3C 
&X00111001 &X00111010 &X00111011 


si ] 
(SI{I{I{[[K 
n [| 
62 63 
&H3E &H3F &H40 
&X00111110 &X00111111 &X01000000 
| 
[| 
65 66 67 
&H41 &H42 &H43 &H44 
&X01000001 &X01000010 &X01000011 &X01000100 
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71- 
&H45 &H46 &H47 &H48 
&X01000101 &X01000110 &X01000111 &X01001000 


&H4B &H4C 
&X01001011 


80 
&H50 
&X01010000 


&H4D &H4E 


| 
I 
81 83 84 
&HS1 &H52 &H53 &H54 
&X01010001 &X01010010 &X01010011 &X01010100 


&H55 &H56 &H57 &H58 
&X01010101 &X01010110 &X01010111 &X01011000 
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&H59 
&X01011001 


93 
&H5D 
&X01011101 


Rune 


97 
&H61 
&X01100001 


&X01101001 
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&H5A 
&X01011010 


&HSE 
&X01011110 


98 
&H62 
&X01100010 


102 
&H66 
&X01100110 


&H6A 
8&X01101010 


91 
&HS5B 
&X01011011 


&HSF 


&H63 


103 
&H67 
&X01100111 


107 
&H6B 
&X01101011 


92 
&H5C 
&X01011100 


&H60 


100 
&H64 
&X01100100 


&H68 
&X01101000 


108 
&H6C 
&X01101100 


Riferimenti 


109 
&H6D 
&X01101101 


&H71 


&H6E 
&X01101110 


BERE 
DENNNSEE 
114 


&H72 
&X01110010 


111 
&H6F 
&X01101111 


&H70 


116 
&H74 
&X01110100 


117 119 120 

&H75 &H76 &H77 &H78 

&X01110101 &X01110111 &X01111000 

(| 
[_] 
122 123 124 
&H79 &H7A &H7B &H7C 
&X01111001 &X01111010 &X01111011 &X01111100 
Ae TOO] 

E 
DI 
uu 
TO 
d0 
una 
CO 

125 127 

&H7D & &H7F &H80 

&X01111101 &X01111110 &X01111111 &X10000000 
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&H81 &H82 


&H85 &H86 


138 


141 
&H8D &HBE 
&X10001101 


&H91 
&X10010001 
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&H8A 
&X10001010 


&X10010010 


&H83 
&X10000011 


139 
&H8B 
&X10001011 


147 
&H93 
&X10010011 


&H88 


140 
&H8C 
&X10001100 


144 
&H90 
&X10010000 


&H94 
&X10010100 


Riferimenti 


&H85 &H86 


138 
&H8A 
&X10001010 


&H8D &H8E 
&X10001101 


&H83 
&X10000011 


136 
&H88 
&X10001000 


139 140 
&H8B &H8C 
&X10001011 &X10001100 


&H90 


uuE 
REGRRENE 
OITTCCDA CECLCTCO 
145 146 147 148 
&H91 &H92 &H93 &H94 
&X10010001 &X10010010 &X10010011 &X10010100 
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&X10101100 


176 
&HAD &HAE &HAF &HB0 
&X10101111 &X10110000 


177 179 
&HB1 &HB3 &HB4 
&X10110001 &X10110010 &X10110011 &X10110100 
FA 
181 182 183 184 
&HBS5 &HB6 &HB7 &HB8 
&X10110101 &X10110110 &X10110111 &X10111000 
n° I] n 
[| 
185 186 188 
&HB9 &HBA &HBB &HBC 
&X10111001 &X10111010 &X101110f1 &X10111100 
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189 190 191 
&HBD &HBE &HBF 
&X10111101 &X10111110 &X10111111 &X11000000 
n 
194 195 196 
&HC2 &HC3 &HC4 
&X11000001 &X11000010 &X11000011 &X11000100 
ISISIIIIIL] 
NNSNSNE PB 
SNSNSE 
_] | 
n 
197 198 199 
&HC5 &HC6 &HC7 &HC8 
&X11000101 8&X11000110 &X11000111 &X11001000 
Big n 
III 
Bua 
es 
na | 
n n DI 
201 202 203 204 
&HC9 &HCA &HCB &HCC 
&X11001001 8&X11001010 &X11001011 &X11001100 
n ee, 
L_] 
n 
205 206 207 
&HCD &HCE &HCF 
&X11001101 &X11001110 &X11001111 &X11010000 
Riferimenti Capitolo 7 Pagina 17 


209 210 
&HDI1 &HD2 &HD4 
&X11010001 &X110:0100 
216 
&HD7 &HD8 
&X11010111 &X11011000 
219 220 
&HDB &HDC 
&X11011001 &X11011010 &X11011011 &X11011100 


222 224 
&HDE &HDF &HEO 
&X11011110 &X11100000 


225 227 228 
&HET &HE2 &HES3 &HE4 
&X11100001 &X11100010 &X11100011 &X11100100 
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229 
&HES 
&X11100101 


233 
&HE9 
&X11101001 


230 
&HE6 
&X11100110 


234 
&HEA 
&X11101010 


&HEE 


231 
&HE7 


235 
&HEB 
&X11101011 


239 
&HEF 
8X11101111 


232 
&HE8 
&X11101000 


240 
&HFO 
&X11110000 


I 
241 242 243 244 
&HF1 &HF2 &HF3 &HF4 
&X11110001 &X11110100 
mu 
O 
245 246 247 248 
&HF5 &HF6 &HF7 &HF8 
&X11110101 8&X11110110 8&X11110111 &X11111000 
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249 250 251 252 
&HF9 &HFA &HFB &HFC 
&X11111001 &X11111010 8&X11111011 &X11111100 


253 255 
&HFD &HFE &HFF 
&X11111101 &X11111110 8X11111111 
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Parte 4: Riferimenti ai tasti 


Normali valori ASCII (esadecimali) 


MUNDI 


7E 1F 1E ZE 
24 | 25 || 26 || 27 || 28 23 | 5F | 30 | AI 7E | N/A | NA || N/A 
32 34 || 35 j| 36 |_ 37 JL 38 || 33 [| 30 || 20 || SÈ 7F 
EI n [7 12 ][ 14 15 ][ 09 de 39 09 18 
» 51 || 57 52 || 54 55 HI 8 N/A || N/A || N/A 
0 n_JL_27 72 || 74 75 Hi GF m 45 HE 
EI E Ei HI E4 (88 [3A | Hi E OD 
44 | | |38| N/A || N/A 
RE tti HA EA al 
F8 
E 3 | (30 | N/A ||N/A{ F4 {{N/A 
E i Fina E (| 3 3E FÒ 
FA || F9 || EB 
N/A F6 F7 
| F2 F3 


JOYSTICK O JOYSTICK 1 


Nota: N/A indica un tasto senza un corrispondente valore ASCII 
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Caratteri di espansione, normali locazioni e valori 


SUN 


IM Li 
Le || 
z [Tele] 


Nota: N/A indica un tasto senza un corrispondente valore ASCII 


ESPANSIONE VALORI NORMALI 
aaa] 
CARATTERE | CARATTERE VALORE ASCII 
0(128) (.) &30 
1(129) 1 &31 
2(130) 2 &32 
3(131) 3 &33 
4(132) 4 834 
5(133) 5 &35 
6(134) 6 &36 
7(135) 7 &37 
8(136) 8 &38 
9(137) 9 &39 
10(138) î &2E- 
11(139) [RETURN] 
12(140) RUN"[RETURN] | &52&55 &4E &22 &OD 


Nota: Le espansioni dei caratteri da 13 a 31 (da 141 a 159) hanno 
normalmente valore nullo. Essi hanno i valori assegnati usando il 
comando KEY di BASIC e vengono assegnati ai tasti usando il 


comando KEY DEF. 
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Tasti e numeri dei joystick 


TISVINNS INSINNA NOAA IMNINIÈEANDIINMNNANNAAAANAAN 


[e[es[e]e[ee]e[e]e]o0[=]=[s]=]e][e]o]n]s] 
[ef] 5) 
[2 |o]efe]e]s]e]s]e]s[wo]2] = [so]? 
EA E eee ji 


JOYSTICK O JOYSTICK 1 

i 
FIRE 2|| FIRE1 FIRE 2 || FIRE1 

iP 77 75 52 53 
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Parte 5: Il suono 


Periodi di note e toni 


La tabella che segue, fornisce i periodi consigliati per le note nella normale scala 


temperata, per tutte le otto ottave. 


La frequenza prodotta non è esattamente la frequenza richiesta in quanto il periodo deve 
essere composto da un intero. L'ERRORE RELATIVO è il rapporto percentuale della 
differenza tra la frequenza corretta e quella effettiva. 


NOTA FREQUENZA PERIODO ERRORE RELATIVO 


Do 
Do # 
Re 
Re # 
Mi 
Fa 
Fa # 
Sol 


.352 
.324 
.+354 
.445 
.602 
«827 
125 
.500 


Sol # 72% 


La 29. 


500 
1359 


La # 30.868 


Si 


3822 
3608 
3405 
3214 
3034 
2863 
2703 
2551 
245098 
2273 
2145 
2025 


-0. 
+0. 
-0. 
-0. 
+0. 
-0. 
+0. 
=D 
+0. 
+0. 
-d. 
+0. 


007% 
007% 
007% 
004% 
009% 
016% 
009% 
002% 
005% 
012% 
008% 
011% 


Ottava -4 


NOTA FREQUENZA PERIODO ERRORE RELATIVO 


Sta 
34. 
36. 
38 
.203 
43. 
46. 
48. 
Fila 
55. 
DS 
&1, 


41 
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703 
648 
708 
891 


654 
249 
GIS 
913 
000 
270 
RSI 


1911 
1804 
1703 
1607 
1517 
1432 
139] 
1276 
1204 
1136 
1973 
1912 


-d. 
+0. 
+0. 
-d. 
+0. 
+0. 
-<D. 
+0. 
+0. 
-0. 
+0. 
-0. 


007% 
007% 
022% 
004% 
009% 
019% 
028% 
037% 
005% 
032% 
039% 
038% 


Ottava 3 


Riferimenti 


NOTA FREQUENZA —PERIODO ERRORE RELATIVO 


Do 65.406 956 +9.0946% 
Do # 69.296 992 +0.007% 
Re 73.416 851 -0.037% 
Re # 77.782 804 +09.058% 
Mi 82.407 758 -0.957% 
Fa 87.307 716 +0.019%  Ottava2 
Fa # 92.499 676 +09.046% 
Sol 97.999 638 +0.037% 
Sol# 103.826 602 +0.005% 
La 110.000 568 -0.032% 
La # 116.541 536 -0.055% 
Si 123.471 506 -0.038% 


NOTA FREQUENZA PERIODO ERRORE RELATIVO 


Do 130.813 478 +0.046% 
Do# 138,591 451 +0.007% 
Re 146.832 426 +09.081% 
Re# 155.564 492 +0.0958% 
Mi 164.814 379 -0.0957% 
Fa 174.614 358 +9.019%  Ottaval 
Fa# 184.997 338 +09.046% 
Sol 195.998 319 +0.037% 
Sol# 297.652 301 +9.005% 
La 220.000 284 -0.032% 
La# 233.082 268 -0.055% 
Si 246.942 253 -0.038% 


NOTA FREQUENZA — PERIODO ERRORE RELATIVO 


261.626 239 +9.0946%  Docentrale 
277.183 225 -0.215% 
293.665 213 +0.0981% 
311.127 201 +0.058% 
329.628 190 +0.206% 
349.228 179 +0.019% 
369.994 169 +0.046% 
391.995 159 -0.277% 
415.305 150 -0.328% 
450.000 142 -09.0932% La internazionale 
466.164 134 -0.955% 

493.883 127 +0.356% 


Ottava 0 
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NOTA FREQUENZA PERIODO ERRORE RELATIVO 


Do 523.251 119 -0.374% 
Do# 554.365 113 +0.229% 
Re 587.330 106 -0.390% 
Re# 622.254 100 -0.441% 
Mi 659.255 95 +0. 206% 
Fa 698.457 89 -0.543% Ottava 1 
Fa# 739.989 84 -0.548% 
Sol 783.991 80 +0.350% 
Sol# 830.609 75 -0.328% 
La 880.000 71 -0.032% 
La# 932.328 67 -0.0955% 
Si 987.767 63 -0.435% 


NOTA FREQUENZA PERIODO ERRORE RELATIVO 


Do 1946.5092 60 +0.462% 
Do# 1108.731 56 -0.662% 
Re 1174.659 53 -0.390% 
Re# 1244.508 50 -0.447% 
Mi 1318.5109 47 -0.855% 


Fa 1396.913 45 +0.574% Ottava 2 
Fa# 1479.978 42 -0.548% 
Sol 1567.982 40 +0.350% 
Sol# 1661.2219 38 +0.992% 
| La 1760.0900 36 +1.357% 
La# 1864.655 34 +1.417% 
Si 1975.533 32 +1.134% 


NOTA FREQUENZA PERIODO ERRORE RELATIVO 


Do 2093.0094 30 +0.462% 
Do# 2217.461 28 -0.662% 
Re 2349.318 27 +1.469% 
Re# 2489.0916 25 -0.441% 
Mi 2637.0921 2h +1.246% 
Fa 2793.826 22 -1.685% 
Fa#  2959.955 21 -0.548% 
Sol 3135.963 20 +0.350% Ottava 3 
Sol# 3322.438 19 +0.992% 
La 3520.000 18 +1.357% 
La# 3729.3110 17 +1.417% 
Si 3951.0966 16 +1.134% 


I valori sopra riportati sono tutti calcolati dal La internazionale nel modo seguente: 
FREQUENZA = 440*(2*(OTTAVA+((n-10)/12))) 

PERIODO = ROUND(62500/FREQUENZA) 

... dove N è 1 per il Do, 2 per il Do #, 3 per il Re, ecc. 
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Parte 6: Messaggi di errore del BASIC 


1 Unexpected NEXT 


E’ stato trovato un comando NEXT che non ha un corrispondente FOR, o la variabile di 
controllo nel comando NEXT non è uguale a quella del FOR. 


2 Syntax Error 

Il BASIC non comprende la linea in questione che contiene un costrutto non legale. 
3 Unexpected RETURN 

E’ stato trovato un RETURN all’esterno di una sub-routine. 

4 DATA exhausted 

Un comando READ ha cercato di leggere oltre la fine dell’ultimo DATA 

5 Improper argument 


E’ unerrore di carattere generale. Il valore dell’argomento della funzione, o un parametro 
di un comando non è lecito per qualche motivo. 


6 Overflow 


Il risultato di una operazione aritmetica ha oltrepassato i limiti numerici della macchina. 
Può essere un overflow in virgola mobile, nel qual caso l’operazione ha fornito un valore 
più grande di 1.7 E38 (circa). Altrimenti può essere il risultato di un tentativo fallito di 
convertire un numero in virgola mobile in un intero a 16 bit con il segno. 


7 Memory full 


Lo spazio occupato dal programma attualmente in uso o dalle sue variabili è semplice- 
mente troppo grande o una struttura di controllo è innestata troppo profondamente (vale 


per i GOSUB, i WHILE ed i FOR). 


Il comando MEMORY può dare questo errore se si cerca di dare alla memoria del BASIC 
uno spazio troppo piccolo o troppo grosso. Si noti che ad ogni file aperto corrisponde un 


buffer che può ridurre lo spazio di memoria utilizzabile dal comando MEMORY. 
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8 Line does not exist 

Non si trova la linea a cui si fa riferimento. 

9 Subscript out of range 

Uno degli indici di un vettore è troppo grande o troppo piccolo. 
10 Array already dimensioned 

Uno dei vettori in una istruzione DIM è già stato dichiarato. 

11 Division by zero 

Può capitare nelle divisioni per numeri reali, interi, moduli interi o nelle esponenziali. 
12 Invalid direct command 

L’ultimo comando immesso non ha senso in modo diretto. 

13 Type mismatch 


E’ stato presentato un valore numerico dove occorreva una stringa o viceversa, oppure 
è stato trovato da una istruzione READ o INPUT un numero composto irregolarmente. 


14 String space full 


Sono state create così tante stringhe che non vi è più spazio, anche dopo una “pulizia della 
memoria”, 


15 String too long 


La stringa è più lunga di 255 caratteri. Può essere generato se si cerca di riunire insieme 
più stringhe. 


16 String expression too complex 
Le espressioni su stringhe possono generare un gran numero di stringhe intermedie. 


Quando il numero di tali stringhe eccede un limite ragionevole, viene riportato questo 
messaggio di errore. 
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17 Cannot CONTinue 

Per qualche motivo il programma non può esser fatto ripartire usando CONT. CONT fa 
ripartire un programma dopo un comando STOP, dopo una sequenza [ESC][ESC] o 
dopo un errore e che ogni modifica apportata al programma rende il riavvio impossibile. 
18 Unknown user function 

Non vi è un DEF FN per la funzione chiamata. 


19 RESUME missing 


Si è incontrata la fine del programma in modo gestione errori (in una routine ON ERROR 


GOTO). 
20 Unexpected RESUME 


L’uso di RESUME è lecito solo in modo gestione errori (in una routine ON ERROR 
GOTO). 


21 Direct command found 

Caricando un file è stata trovata una linea senza numero di linea. 

22 Operand missing 

Il BASIC ha incontrato una espressione incompleta. 

23 Line too long 

Una linea, convertita nel formato interno del BASIC è diventata troppo lunga. 
24 EOF met 

E° stato fatto un tentativo di leggere oltre la fine di un file. 

25 File type error 


Il file che è stato letto non è di un tipo utilizzabile. OPENIN può leggere solo file ASCII. 
Analogamente LOAD, RUN, ecc. possono utilizzare solo file prodotti da un SAVE. 
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26 Next missing 


Non si trova un NEXT che corrisponda ad un comando FOR. La linea che accompagna 
questo messaggio indica il FOR in cui si è rilevato l’errore. 


27 File already open 


E’ stato eseguito un comando OPENIN o OPENOUT prima di chiudere un file già 
aperto. 


28 Unknown command 


Il BASIC non riesce a trovare un comando esterno, un comando preceduto dalla barra 
verticale. 


29 WEND missing 
Non si trova un WEND dopo un comando WHILE. 
30 Unexpected WEND 


Si è incontrato un WEND all’esterno di un ciclo WHILE o un WEND che non 
corrisponde ad un comando WHILE. 


31 File not open 
Vedere il seguente paragrafo intitolato “Errori relativi al disco”. 
32 Broken in 


Vedere il seguente paragrafo intitolato “Errori relativi al disco”. 


Errori relativi al disco (AMSDOS) 


Vi sono molti errori che possono capitare durante l’utilizzo dei dischi. Il BASIC può 
gestire tutti questi errori come ERRore numero 32, ma ulteriori informazioni vengono 
riportate dalla funzione DERR usata quando trova tale errore. Essa restituisce i seguenti 
valori: 
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Errore AMSDOS Valore DERR Causa 


0 Bo 22 E’ stato premuto [ESC] 
14 142(128+14) Ilcanale nonè in uno stato utilizzabile 
15 143(128+15) Raggiunta la fine hrdware del file 


16 144(128+16) Comando errato, normalmete causato 
da un nome di file errato 


1; 145(128+17) Ilfile esiste già 
18 146(128+18) Il file non esiste 
19 147(128+19) La direttrice è piena 


20 148(128+20) Il disco è pieno 


21 149(128+21) Ildisco è stato cambiato mentre erano 
ancora aperti dei file su di esso 
22 150(128+22) Il file è a sola lettura 


26 154(128+26) Raggiunta la fine software del file 


Se AMSDOS ha già trovato un errore, il bit 7 è attivo; il valore di DERR viene perciò 
sommato a 128 


Altri valori ritornati da DERR vengono prodotti dalla scheda di gestione del drive ed 
hanno sempre il bit 6 attivo. Il bit 7 indica che l’errore è stato rilevato dall’ AMSDOS 
(come si è già spiegato). Il significato dei bit è il seguente: 


to 
_ 


Significato 

Indirizzo mancante 

Non scrivibile, il disco è protetto dalla scrittura 
‘Nessun dato, non si trova il settore 

Drive non pronto, nessun disco nel drive 


Errore di overrun 

Errore nei dati, errore di Ridondanza ciclica 

Sempre a 1, indica che l’errore è prodotto dalla scheda di controllo dei dischi 
1 se l’errore è già stato trovato da AMSDOS 


IN ÙUDAWNEO Tg 
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ERR può anche restituire 31 se si è tentato l’accesso ad un file non aperto. Il normale 
modo in cui è possibile usare ERR e DERR consiste nell’includerlo in un comando ON 
ERROR GOTO che chiama una breve routine che controlla se ERR ha valore 31 0 32 
e, se il valore è 32, è possibile interrogare DERR per ottenere ulteriori informazioni che 
riguardano la natura dell’errore. Ad esempio: 


10 ON ERROR GOTO 1000 

20 OPENOUT “miofile.asc” 

30 WRITE #9, “dati di prova” 

40 CLOSEOUT 

50 END 

1000 amsdoserr= (DERR AND &7F):REM elimina il bit 7 

1010 IF ERR<31 THEN END 

1020 IF ERR=31 THEN PRINT “sicuro-di aver immesso correttamente la linea 
20?”:END 

1030 IF amsdoserr=20 THEN PRINT “il disco è pieno, usare un nuovo 
disco”:END 

1040 IF amsdoserr=&X01001000 THEN PRINT “inserire un disco nel drive, poi 
premere un tasto”:WHILE INKEY$=”":WEND:RESUME 

1050 END 


Parte 7: Parole chiave del BASIC 


La seguente è una lista di tutte le parole chiave del BASIC del CPC6128. Come tali esse 
sono riservate e non possono essere usate per i nomi di variabili. 


ABS, AFTER, AND, ASC, ATN, AUTO 
BIN$, BORDER 


CALL, CAT, CHAIN, CHR$, CINT, CLEAR, CLG, CLOSEIN, CLOSEOUT, CLS, 
CONT, COPYCHR$, COS, CREAL, CURSOR 


DATA, DEC$, DEF, DEFINT, DEFREAL, DEFSTR, DEG, DELETE, DERR, DI, 
DIM, DRAW, DRAWR 


EDIT, EI, ELSE, END, ENT, ENV, EOF, ERASE, ERL, ERR, ERROR, EVERY, 
EXP 


FILL, FIX, FN, FOR, FRAME, FRE 
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GOSUB, GOTO, GRAPHICS 

HEX$, HIMEM 

IF, INK, INKEY, INKEY$, INP, INPUT, INSTR, INT 

JOY 

KEY 

LEFT$, LEN, LET, LINE, LIST, LOAD, LOCATE, LOG, LOG109, LOWER$ 
MASK, MAX, MEMORY, MERGE, MID$, MIN, MOD, MODE, MOVE, MOVER 
NEXT, NEW, NOT 


ON, ON BREAK, ON ERROR GOTO 0, ON Sa, OPENIN, OPENOUT, OR, 
ORIGIN, OUT 


PAPER, PEEK, PEN, PI, PLOT, PLOTR, POKE, POS, PRINT 


RAD, RANDOMIZE, READ, RELEASE, REM, REMAIN, RENUM, RESTORE, 
RESUME, RETURN, RIGHT$, RND, ROUND, RUN 


SAVE, SGN, SIN, SOUND, SPACE$, SPC, SPEED, SQ, SQR, STEP, STOP, 
STR$, STRING$, SWAP, SYMBOL 


TAB, TA5, TAGOFF, TAN, TEST, TESTR, THEN, TIME, TO, TROFF, TRON 
UNT, UPPER$, USING 

VAL, VPOS 

WAIT, WEND, WHILE, WIDTH, WINDOW, WRITE 

XOR, XPOS 

YPOS 


ZONE 
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Parte 8: Tabelle 


Tabella per il testo e la finestra - MODE 0 (20 colonne) 
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Tabella per il tasto e la finestra - MODE 1 (40 colonne) 


s AH AHH4444H4H-A : 
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Tabella per il testo e la finestra - MODE 2 (80 colonne) 


Riferimenti 
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Tabella per gli inviluppi e la musica 
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Parte 9: Collegamenti 


Prese di Input e Output del CPC6128 


PRESA ALIMENTAZIONE 5V VTOT TRS] 6) 
. CLIN 
Cc=ao 


K PRESA _ | USCITA 
REGISIKAIORE | STEREO 
PRESA PER $ PORTA STAMPANTE 


SECONDO DRIVE 
PRESA JOYSTICK 


$/ 
PRESA PER MONITOR SPINA 12v PETTINE DI ESPANSIONE 


Presa per Joystick 


SU 

GIU 
SINISTRA 
DESTRA 
SPARE 
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Presa per monitor 


PIN 1 ROSSO SYNC 


PIN 2 VERDE TERRA 
PIN 3 BLU LUMIN 


Uscita stereo DESTRO 


TERRA SINISTRO 


Presa per registratore 


PIN 1 TELECOMANDO | Pin 4 INGRESSO DATI 
PIN2 TERRA PINS USCITA DATI 
PIN 3 TELECOMANDO 
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Pettine di espansione 


VISTO DAL RETRO 


49 47 45 43 41 39 37 35 33 31 29 27 25 23 21 19 17 15 13 11 9 7 5 3 1 


Presa per secondo drive 


VISTA DAL RETRO 


2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 


1 3 5 7 9 11 13. 15 17 19 21 23 25 27 29 31 33 


READY GND___ 
GND MOTORON 
SIDE 1 SELECT GND 

GND N/C 

READ DATA GND 

GND DRIVE SELECT 1 
WRITE PROTECT GND 

GND N/C 
TRACKO GND 

GND INDEX 
WRITE GATE GND 

GND N/C 

WRITE DATA GND 

GND N/C 

STEP GND 

GND N/C 
DIRECTION SELECT GND 
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Porta stampante 


VISTA DAL RETRO 


3534 33 32 31 30 29 28 27 26 25 24 23 22 21 20 19 


STROBE PIN 19 GND - 
DO PIN 20 GND 
DI PIN 21 GND 
D2 PIN 22 GND 
D3 PIN 23 GND 
PIN 24 GND 
DS PIN 25 GND 
PIN 26 GND 
PIN 28 GND 
PIN 33 GND 


Gli altri pin non sono connessi 


Parte 10: Stampanti 


Interfacciamento stampanti 


Il 6128 permette di collegare ed usare tutte le stampanti che usano l’interfaccia standard 
Centronics. 


Il cavo per la stampante è costituito semplicemente da una connessione uno-a-uno tra la 
porta stampante sul retro del computer ed il connettore di una stampante parallela. Notare 
che sulla porta del computer vi sono due collegamenti in meno rispetto a quelli della 
stampante. Questo permette di utilizzare un connettore standard per circuito stampato. 


I dettagli relativi alle connessioni presenti sull’interfaccia si trovano nel Capitolo 9. 
Il cavo dovrà essere costruito in modo tale che il pin 1 del computer si colleghi al pin 1 


della stampante, il pin 19 del computer al pin 19 della stampante, e così via. Tuttavia i pin 
18 e 36 della stampante non dovranno essere connessi al computer. 
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Si noti che, sebbene vi siano 17 pin sulla riga superiore della porta stampante del 
computer, la riga inferiore è numerata da 19 in poi (invece che da 18 in poi). In tal modo 
ogni filo connetterà esattamente gli stessi pin sulla stampante e sul computer. 


Il computer usa il segnale BUSY (pin 11) per sincronizzarsi con la stampante; in tal modo 
si metterà in attesa se la stampante è fuori-linea (OFF-LINE). 


Non vi sono comandi di predisposizione a carico dell’utente, e l’output verrà sempre 
inviato al canale #8. 


Sebbene la porta per stampante del CPC6128 sia abilitata all’uso delle stampanti a 
matrice di basso costo, con una interfaccia adatta, potrà utilizzare stampanti a marghe- 
rita, plotter grafici e stampanti a getto di inchiostro a più colori. La compatibilità è 
garantita dall’interfaccia parallela standard. 


Il software personalizzato per le stampanti AMSTRAD DMP2000 e DMPI facilitano 
l’uso della grafica punto a punto e la stampa di copie dello schermo. 


Configurazione della stampante 


Viene fornita la possibilità di stampare alcuni caratteri che possono apparire sullo 
schermo e che sono disponibili sulle stampanti AMSTRAD DMP2000 e DMPI1 ma con 
codici diversi. La maggior parte di questi simboli sarà disponibile solo se la stampante 
è predisposta ad utilizzare i caratteri di una data lingua. Ad esempio: 


PRINT CHR$(&A0) 
A 
PRINT #8, chr$(&A0) 


viene stampato sulla stampante. 


Ciò funzionerà anche se il codice per l’accento circonflesso sulla stampante è &5E. In 
altre parole la routine di stampa ha riconosciuto &A0 come uno dei codici contenuti nella 
tabella di traduzione e l’ha convertito in &5E in modo che lo stesso carattere che appare 
sullo schermo venga anche riportato sulla stampante. Il codice &5E produrrà sulla 
stampante un accento circonflesso, per qualunque linguaggio essa sia predisposta (ciò 
non è vero per tutti i caratteri della tabella di traduzione). Gli altri caratteri sottoposti a 
traduzione sono riportati nella seguente tabella. 


Capitolo 7 Pagina 42 Riferimenti 


tt Traduzione 
Se illa U.S.A.| Francia | Germania 


schermo stampante 


+_ Peri caratteri stampati, si faccia riferimento al manuale della stampante. 


Questa tabella riporta una parte delle traduzioni e può essere modificata se è il caso. 
Vedere il manuale del firmware (SOFT968) per ulteriori dettagli. 


Parte 11: Joystick 


Il software del computer può gestire uno o due joystick. Essi vengono gestiti come una 
parte della tastiera ed in tal modo possono essere interrogati mediante INKEY e INKEY$. 


Si noti che nella maggior parte dei casi, il tasto principale “fire” di un joystick viene 
interpretato come “fire 2” dal 6128. 


Le funzioni Joy(0) e Joy (1) permettono il controllo rispettivamente del primo e del 
secondo joystick. La funzione restituisce un risultato mappato bit a bit che indica lo stato 
degli interruttori del joystick all’ultima scansione della tastiera. 


La tabella qui sotto indica i valori restituiti da entrambi i joystick. I valori della funzione 
JOY sono seguiti dai valori da utilizzare nei comandi che usano come parametro il 
numero del tasto (ad esempio INKEY e KEY DEF). 


COMANDO JOY VALORE DEL TASTO 
ea 
BIT VALORE PRIMO —! SECONDO TASTO 
USATO RESTITUITO' JOYSTICK | JOYSTICK. EQUIVALENTE 


Alto ‘6° 
Basso ‘5° 
Sinistra ‘R’ 
Destra si 
Fire 2 ‘G’ 
Fire 1 p 
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Si noti che quando i valori dei tasti del secondo joystick vengono restituiti, il computer 
non può sapere se tali valori sono stati provocati dal joystick o da uno degli equivalenti 
tasti della tastiera (indicati nell’ultima colonna della tabella precedente). Ciò significa 
che la tastiera può essere usata per sostituire il secondo joystick. 


Parte 12: Organizzazione dei dischi 


Il BIOS permette di utilizzare tre diversi formati di dischi: ilformato SYSTEM, il formato 
DATA ONLY ed il formato IBM. Sotto AMSDOS, il formato di un disco è controllato 
automaticamente ogni volta che si fa accesso ad un disco che non ha file aperti. Per 
permettere l’uso del controllo automatico, ogni formato ha un diverso tipo di numerazi- 
one dei settori. 


I dischi da 3 pollici vengono utilizzati sulle due facce, ma una faccia per volta può essere 
utilizzata, a seconda del lato in cui viene inserito il disco. Vi può essere un diverso formato 
per lato. 


Caratteristiche comuni a tutti i formati: 


Singola faccia. 

Dimensione dei settori: 512 byte. 

40 tracce numerate tra 0 e 39. 

Dimensione del blocco CP/M di 1024 byte. 
Posto per 64 file nella direttrice. 


Formato SYSTEM 


9 settori per traccia numerati da &41 a &49 
2 tracce riservate 


Il formato SYSTEM è il principale formato supportato, in quanto il sistema operativo 
CP/M può essere caricato solo da un disco in formato SYSTEM. Il CP/M 2.2 richiede un 
disco di formato sistema anche per effettuare un avviamento (boot) a caldo. Le tracce 
riservate sono utilizzate come segue: 


CP/M 2.2 
Traccia 0 settore &41 ‘settore di boot :settore di boot 
Traccia 0 settore &42 ‘sett. configurazione ‘non usato 
Traccia 0 settori da &43 a &47 :non usato :non usato 
Traccia 0 settori &48 e &49 :CCP e BDOS ‘non usato 
Traccia 1 settori da &41 a &49 :CCP e BDOS :non usato 


Il formato VENDOR è una versione speciale del formato SYSTEM che non contiene 
software di sistema nelle prime 2 tracce riservate. Viene utilizzato nel campo della 
distribuzione di software. 
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Formato DATA ONLY 


9 settori per traccia numerati da &C1 a &C9 
0 tracce riservate 


Questo formato non è raccomandato per l’uso con CP/M 2.2 in quanto non è possibile 
effettuare un avviamento a caldo da esso. Tuttavia, se viene utilizzato solo CP/M Plus o 
AMSDOS, questo formato fornisce un po’ più di spazio sul disco. 


Formato IBM *Solo CP/M 2.2 


8 settori per traccia numerati da &1 a &8. 
1 traccia riservata. 


Questo formato corrisponde al formato a singola faccia usato dal CP/M sui PC IBM. Il 
6128 può leggere o scrivere sui dischi in formato IBM, ma non può crearne uno o copiarlo. 


Parte 13: Sistema di estensione residente RSX 


I comandi esterni sono stati introdotti nel Capitolo 5 (su AMSDOS). Fondamentalmente, 
un comando esterno costituisce un modo per estendere il dizionario del BASIC ag- 
giungendo nuovi comandi preceduti dal prefisso “I”. Le istruzioni per la macchina per i 
nuovi comandi di AMSDOS sono contenuti in una ROM, e le operazioni per l'aggiunta 
di nuovi comandi vengono effettuate automaticamente quando il 6128 avvia il BASIC. 


E’ anche possibile aggiungere altri comandi esterni (dopo che il BASIC è stato avviato) 
caricando le istruzioni macchina in RAM. Tali comandi vengono chiamati RSX e 
funzionano esattamente nello stesso modo dei comandi residenti su ROM. I comandi 
RSX devono essere caricati da disco (o da cassetta) ogni volta che il 6128 avvia o 
reinizializza il BASIC. Normalmente i comandi RSX verranno utilizzati per gestire 
speciali dispositivi periferici come una penna ottica o un sintetizzatore vocale. 


Il Capitolo 8 descrive l’uso dei comandi RSX per accedere ai secondi 64K della memoria 
del 6128. 
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Parte 14: Memoria 


Il CPC6128 contiene 128K di RAM e 48K di ROM. Questa memoria è disponibile al 
BASIC 1.1 nel modo seguente. I primi 64K di RAM sono divisi in 4 blocchi (ognuno di 
16K) numerati da 0 a 3. Lo schermo usa il Blocco 3 e la parte superiore del Blocco 2 è 
utilizzata dalle variabili di sistema. 


SECONDI 64K DI RAM 


PRIMI 64K DI RAM non usati 


car 


BLo co ; 


BLOCc) *d AREA DI DATI DEL FIRMWARE » 
BLOCCO DI SALTO 

AREA DATI DEL BASIC 

AREA DATI DELLA 


' 

N Ù 

' 

RI MEO Tec ! 
Soeetitas > : 

| È ' 
£8000 ROM DEL DISCO a 

Pa . AREA DATI DI OGNI ALTRA ROM 
I \ 

' 

' 

' 

' 

UÙ 

' 

Ù 


Ul Di 


= [Asso 
BLOC) AREA DEL PROGRAMMA BASIC 


ù 


PR 
sugli 


NOTAI: DIPENDE DALLE ROM INSERITE ESTERNAMENTE - &A6FC SE NON E' CONNESSA ALCUNA ROM 


Mappa di memoria del BASIC 1.1 


I caratteri definibili dall’utente vengono inizialmente posti sopra HIMEM. HIMEM può 
essere modificato con il comando MEMORY ma viene abbassato automaticamente di 4K 
per creare un buffer per i file di AMSDOS. Il numero dei caratteri definibili dall’utente 
può essere modificato solo se HIMEM non è cambiato dall’ultima volta che essi sono stati 
fissati (a meno che l’ultima volta che sono stati fissati era stato scelto di non avere alcun 
carattere definibile dall’utente con il comando SYMBOL AFTER 256). Quando il 
BASIC viene avviato, i caratteri definibili dall’utente sono fissati come se fosse stato 
usato il comando SYMBOL AFTER 240. 


E’ perciò prudente ridurre l’area dei caratteri definibili dall’utente prima di cambiare 
permanentemente HIMEM e poi ristabilire i caratteri definibili dall’utente nella nuova 
posizione. In questo modo i programmi successivi potranno alterare l’assegnamento 


SYMBOL AFTER. 
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L’esempio qui sotto mostra questo schema all’opera quando HIMEM è abbassato in 
congiunzione al caricamento di un RSX. 


100 SYMBOL AFTER 256 ' collapse user defined characters 
119 rsxaddress=HIMEM-rsxlength 

1209 MEMORY rsxaddress-1 

1309 LOAD "rsxcode",rsxaddress 

740 CALL rsxaddress ' log on rsx 

150 SYMBOL AFTER 140 ' restore user defined characters 


Ù 
I 
N 
' 
I 
I oa 
AREA DI DATI DEL FIRMWARE | 
TO I 


BLOCCO DI SALT 

AREA DATI DEI. BASIC Ù 

AREA DATI DELLA ROM DEL DISCO 
€ 


AREA DATI DI OGNI ALTRA ROM 
{| 


Mappa di memoria con gli RSX caricati nella giusta posizione 


I/O Aggiuntivo 
La maggior parte degli indirizzi della porta di I/O è riservata dal computer; in particolare 
gli indirizzi sotto &7FFF non devono essere usati. 
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Si intende che la parte degli indirizzi da A0 ad A7 dovrebbe riflettere il tipo di dispositivo 
di I/O e che le linee di indirizzi A8 e A9 possono essere decodificate per selezionare i 
registri all’interno del dispositivo di I/O. Delle rimanenti linee di indirizzi, solo A10 deve 
essere decodificato (come basso) mentre le linee da A11 ad A15 sono alte. Così ogni 
dispositivo può avere i registri indirizzati come &F8??, &F9??, &FA?? e &FB?? dove 
è compreso tra DC e DF per le interfacce di comunicazione e va da E0 a FE per 
dispositivi di altro genere. 


Si noti che devono essere usate le istruzioni Z80 che portano il registro B nella parte 
superiore del bus degli indirizzi (A15-A8). 


ROM Aggiuntive 


Si è previsto l’uso di ROM aggiuntive al posto di una qualunque delle ROM interne. La 
decisione degli indirizzi e la logica di selezione dei banchi sarà contenuta in un modulo 
connesso al bus di espansione, ma tutti i segnali richiesti vengono portati al bus di 
espansione. 


Parte 15: Emulatore di terminale di CP/M Plus 


Nella parte 1 di questo capitolo è stata illustrata una tabella di tutti i caratteri di controllo 
(insieme alle rispettive operazioni). Queste azioni vengono eseguite se i caratteri 
vengono stampati sullo schermo da BASIC o da CP/M 2.2 e sono state scelte per essere 
di uso semplice e per utilizzare le possibilità di gestione dello schermo del firmware. 
Queste caratteristiche sono specifiche dei computer AMSTRAD ed il software dovrà 
quindi essere adattato al loro uso. 


Nell’ambiente degli affari e commerciale del software di CP/M Plus, è normale aspettarsi 
l’esistenza di gestioni standard dello schermo in modo che il software sia facilmente 
trasportabile ed installabile su diverse macchine. L’implementazione di CP/M Plus sul 
6128 include un emulatore di terminale che fornisce caratteristiche molto simili a quelle 
dello Zenith Z19/Z29. La procedura di installazione del software del CP/M Plus include 
normalmente, come standard, questo tipo di terminale. 


Le caratteristiche offerte dall’emulatore di terminale di CP/M Plus includono molte di 
quelle precedentemente offerte dal firmware di gestione dello schermo anche se occor- 
rono diversi codici di controllo. 


Vi è anche un numero considerevole di nuove e più sofisticate possibilità. 


I caratteri tra &20 e &FF vengono visualizzati all’attuale posizione del cursore. Se il 
cursore non è all’estrema destra dello schermo, esso verrà portato di una colonna più a 
destra. Se il cursore è all’estrema destra dello schermo ed è permesso l’”A capo”, il 
cursore verrà portato nella prima colonna della linea successiva, facendo, se necessario, 
scorrere lo schermo. 
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I caratteri che vanno da &00 a &1F vengono interpretati come codici di controllo nel 
modo seguente. 


&07 BEL 


&08 BS 


&OA LF 


&0D CR 


&1B ESC 


Emette un bip 
Indietro. Sposta a sinistra di una colonna. Se il cursore è nella prima colonna 
a sinistra ma non in cima allo schermo e l’””A capo” è abilitato, esso verrà 


portato sulla colonna più a destra della riga precedente. 


Linefeed. Sposta il cursore verso il basso di una linea, facendo scorrere lo 
schermo se necessario. 


Ritorno carrello. Porta il cursore nella prima colonna della riga in cui si 
trova. 


Inizia una sequenza di Escape. 


Tutti gli altri codici di controllo vengono ignorati. 


Vengono riconosciute le seguenti sequenze di Escape. Ogni altro carattere che segue 


l’ESC verrà 


visualizzato ed il cursore verrà fatto avanzare. Questa caratteristica può 


essere sfruttata per visualizzare i caratteri tra &00 e &1F. Si noti che molti linguaggi 
applicativi espandono il codice di controllo &09 (TAB) in un certo numero di spazi e 
quindi la sequenza [ESC][TAB] spesso potrà non visualizzare il carattere &09. 


[ESC]0 Disabilita la linea di stato. I messaggi relativi al disco appariranno 
sullo schermo che potrà usare l’ultima linea dello schermo. 

[ESC]I Abilita la linea di stato. I messaggi relativi al disco appariranno 
sull’ultima linea dello schermo. 

[ESC]2n Cambia il set di caratteri (vedere parte 16 di questo capitolo). “n” è 
il parametro relativo al linguaggio mascherato con &07. Alcune 
matrici di caratteri tra &20 e &7F vengono sostituiti da altri caratteri 
con codici che vanno da &80 a &FF. L’azione di questo comando è 
molto simile a quella usata per selezionare un diverso set di caratteri 
sulle stampanti che prevedono tale possibilità. 
n=0 USA 
n=1l Francia 
n=2 Germania 
n=3 Gran Bretagna 
n=4 Danimarca 
n=5 Svezia 
n=6 Italia 
n=7 Spagna 
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[ESC]3"m” 


[ESC]A 
[ESC]B 
[ESC]C 
[ESC]D 


[ESC]E 


[ESC]H 


[ESC]I 


[ESC]J 


[ESC]K 


[ESC]L 


[ESC]M 


[ESC]N 


[ESC]Y “1° “c” 


Cambia modalità di schermo. ‘“m”= modo schermo + &20. Il valore 
viene mascherato con &03 per fornire i modi da 0 a 2. Il modo 3 viene 
ignorato. Lo schermo viene cancellato ma il cursore non viene 
spostato. 


Cursore in alto. Nella riga superiore non fa nulla. 

Cursore in basso. Nella riga inferiore non fa nulla. 
Cursore avanti. Nella colonna più a destra non fa nulla. 
Cursore indietro. Nella colonna più a sinistra non fa nulla. 


Cancella la pagina. La posizione del cursore non viene modificata. 
Questo comando cancella l’intero schermo, anche in modo 24x80. 
Altre sequenze di escape cancellano la sola area 24x80 se il computer 
si trova in tale modo. 


Cursore nell’angolo in alto a sinistra. 


Sposta il cursore in alto di una riga, facendo scorrere la finestra se 
necessario. 


Cancella la fine della pagina, partendo dal carattere che si trova alla 
posizione del cursore (compreso). La posizione del cursore non viene 
modificata. 


Cancella la fine della riga, partendo dal carattere che si trova alla 
posizione del cursore (compreso). La posizione del cursore non viene 
modificata. 


Inserisce una linea. Tutte le linea da quella del cursore (compresa) in 
poi vengono fatte scorrere verso il basso. La linea del cursore viene 
cancellata. La posizione del cursore non viene modificata. 


Cancella una linea. Tutte le linee, compresa quella del cursore, 
vengono fatte scorrere verso l’alto. L'ultima riga viene cancellata. La 
posizione del cursore non viene modificata. 


Cancella un carattere. Tutti i caratteri a destra del cursore vengono 
spostati di una posizione a sinistra. Il carattere a sinistra della riga 
viene cancellato. La posizione del cursore non viene modificata. 


Sposta il cursore in una data posizione. Se la posizione è oltre i limiti 
dello schermo, sposta sul margine il cursore. r=riga+&20, 
c=colonna+&20. il primo carattere in alto a sinistra è nella riga 0 e 
colonna 0. 
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[ESC]b “pc” Fissa il colore dei caratteri. Riguarda tutti i caratteri contenuti nello 
schermo. pc è il parametro colore mascherato con &3F e utilizzato 
come tre numeri a 2-bit che specificano l’intensità dei tre colori 
fondamentali: i bit 0 e 1 per il blu, i bit 2 e 3 per il rosso ed i bit 4 e 
5 per il verde. Il 6128 permette tre livelli di intensità secondo lo 
schema: 


CPC6128 
01 0 10 binario 


[ESC]c “pc” Fissa il colore di fondo. Riguarda tutto lo schermo e la cornice dello 
schermo. Il colore viene specificato come sopra. 


[ESC]d Cancella fino all’inizio della pagina compreso il carattere nella 
posizione del cursore. La posizione del cursore non viene modificata. 


[ESC]e Abilita il simbolo del cursore. Per evitare lampeggi indesiderati, il 
cursore non viene acceso durante l’output del testo ma 1/10 di 
secondo dopo la scrittura dell’ultimo carattere. 


[ESC]f Disabilita il simbolo del cursore. 

[ESC]j Salva la posizione del cursore. 

[ESC]k Riporta il cursore nella posizione precedentemente salvata con 
[ESC]j 

[ESC]I Cancella la linea. La posizione del cursore non viene modificata. 

[ESC]o Cancella l’inizio della linea compreso il carattere alla posizione del 


cursore. La posizione del cursore non viene modificata. 


[ESC]p Entra in modo video inverso. I caratteri vengono stampati con i colori 
del fondo e viceversa. 


[ESC]q Esce dal modo video inverso. 

[ESC]r Entra in modo sottolineato (non possibile sul 6128). 
[ESC]u Esce dal modo sottolineato (non possibile sul 6128). 
[ESC]v A capo alla fine della linea. 
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[ESC]w Getta via i caratteri se il cursore è alla fine della linea. 


[ESC]x Entra in modo 24x80. Alcuni programmi applicativi possono richie- 
dere uno schermo standard 24x80. Questo comando abilita tale 
schermo senza preoccuparsi dell’intera dimensione dello schermo 
che può variare da macchina a macchina da paese a paese e dalla 
presenza della linea di stato. Lo schermo viene cancellato. 


[ESC]y Esce dal modo 24x80. Lo schermo viene cancellato. 
Parte 16: Set di caratteri di CP/M Plus 


Nella Parte 10 di questo capitolo è stata descritta una tabella di traduzione per la 
stampante. Lo scopo di tale tabella è quello di convertire alcuni caratteri del BASIC e del 
CP/M 2.2 in una forma in cui possano essere stampati con la stampante predisposta per 
una determinata lingua. Questa possibilità è però limitata dal fatto che pochi caratteri 
nazionali appaiono nel set di caratteri del BASIC. 


Sebbene questo schema di traduzione per la stampante possa essere utilizzato anche in 
CP/M Plus, il set di caratteri è stato potenziato per permettere una corrispondenza quasi 
completa tra i caratteri dello schermo e quelli della stampante. L’unico simbolo non 
permesso sullo schermo è il simbolo della moneta svedese, sostituito dal $. La tabella qui 
sotto conferma questo fatto: 


23 24 40 5B 5C 5D SE 60 7B 7C 7D 7E 


USA 
Francia 
Germania 
GB 
Danimarca 
Svezia 
Italia 


Spagna 


Set di caratteri internazionali di CP/M Plus 
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L’utilizzo della macchina in un ambiente straniero richiede due azioni: 


1. La stampante deve essere predisposta per la lingua considerata, normalmente 
utilizzando dei micro-interruttori ma alcune stampanti utilizzano codici di con- 
trollo. 


Zi Deve essere richiamato il set di caratteri per lo schermo o mediante il comando: 
LANGUAGE n 
o inviando 
[ESC]2 n all' emulatore di terminale. 


In pratica l’inizializzazione può essere effettuata all’interno del file PROFILE.SUB 
usando LANGUAGE e SETLST. CP/M Plus viene fornito con un ambiente di utilizzo 
americano, principalmente perchè la tastiera riporta un # sopra il tasto 3. Nell’elabora- 
zione di testi si potrà utilizzare l’ambiente italiano. 


Software a 7 bit ... 


Anche se la possibilità di usare i caratteri di varie lingue è molto potente, è importante far 
notare che i caratteri americani sostituiti dai caratteri locali del paese non saranno più 
utilizzabili. Questo è un compromesso a cui si deve giungere se si usa software a 7 bit. 
Quasi tutto il software disponibile (comprese molte utility di CP/M Plus, programmi di 
elaborazione del testo e linguaggi) usa set di caratteri a solo 7 bit. Non sempre tutte le 
trasformazioni saranno di facile uso ed ognuno dovrà effettuare mentalmente le sostitu- 
zioni dei caratteri. 


Sfortunatamente, le trasformazioni di alcune lingue sostituiscono caratteri come la barra 
verticale e le parentesi quadre e sebbene la possibilità di utilizzare le accentate aumenti 
la leggibilità del testo, in situazioni in cui occorre utilizzare le barre e le parentesi quadre 
come in DIR [FULL], la leggibilità potrebbe diminuire moltissimo. Si ricordi che il 
programma applicativo utilizza i codici ASCII, indipendentemente dai caratteri visua- 
lizzati sullo schermo. Il problema sta nel fatto che con 7 bit non vi sono codici sufficienti 
per tutti i caratteri. 
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NUO A èawwWnNn - 0 


Utilizzo di set di caratteri ad 8 bit 


Il set di caratteri del BASIC ha 256 simboli diversi; (i valori da 128 a 255 (da &80 a 
&FF) contengono vari simboli grafici utilizzati in giochi e nei vari programmi 
personali (omini danzanti, cuori/quadri/picche/fiori, ecc.). Anche il CP/M Plus 
permette di utilizzare 256 caratteri ma i secondi 128 sono diversi da quelli del BASIC 
e riflettono l’utilizzo in campo economico e internazionale di CP/M Plus. 


0123456789ABCDEF 0123456789ABCDEF 
0OMlAS-+,M14Z6+9t#90 = US3rlrid39=Z7 133 
BYUOIEGAPUPTTFXNYW -totilebo'5obhair+ 

I'#$z&'()*Xt,-.7 a0o°t£OANSftul4«»Rbéli 
0123456789: ;<=}? foc Aug z5S55G5006LYE" 
GABCDEFGHIJKLMNO AELOUAETBIOUAETOUT 
PARSÌUVWXYZI\I]t_ DD AEÉELGUCFAGRAGZ5#< 
‘abcdefghidgjklmno e aéiSsuJaeisuiateicoi 
parstuvuxyz:{(il>}”O0 Fa@éeloucRkraBgsnhndicoIess 


O o» OO 


Caratteri da 0 a 127 (da &00 a &7F) Caratteri da 128 a 255 (da &80 a &FF) 


Set di caratteri standard (USA) di CP/M Plus 


Il software che permette di utilizzare i caratteri ad 8 bit può usare questa tabella per avere 
a disposizione tutti i caratteri internazionali senza dover cambiare necessariamente 
lingua. In questo modo saranno disponibili insieme agli altri anche la barra verticalke e 
le parentesi quadre. 


E° da notare tuttavia che pochi programmi attualmente usano i codici ad 8 bit e che i 
caratteri da 0 a 31 e da 128 a 255 appaiono sempre nella forma qui indicata. Le stampanti 
potranno avere un set di caratteri diverso e modi diversi di stampare lo stesso carattere. 
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Capitolo 8 
Qualcosa di più su 
BANK MANAGER... 


Estensioni al BASIC che permettono di accedere al secondo lotto di 64K 
di RAM. 


Argomenti trattati: 


* Memorizzazione di immagini 
* Operazioni su pseudo-file 


La mappa di memoria di BASIC 1.1 (descritta nel Capitolo 7 parte 14) indica che 64K 
dei 128K di RAM sono inutilizzati. Il BASIC e il firmware stesso risiedono in ROM, la 
quale insieme al disco ROM aumenta la memoria disponibile da 64K a 112K (64K 
RAM, 48K ROM). 


Ogni sezione di 16K è detta “blocco” e una qualsiasi sezione di quattro blocchi (che 
in totale fa 64K) è detta “banco”. La tecnica di scelta dei blocchi è del resto chiamata 
“selezione dei banchi”. 


Il microprocessore Z80 può usare solo 64K di memoria per volta, quindi il sistema 
operativo contiene istruzioni per utilizzare il firmware ROM invece del Blocco 0 di 
RAM, e di utilizzare sia il BASIC ROM o il disco ROM invece del Blocco 3. Questa 
commutazione viene fatta automaticamente quando il BASIC o il firmware è richiesto. 
La scelta dei banchi di RAM estende questo concetto per includere la scelta della RAM 
piuttosto che la ROM. La commutazione viene effettuata da un programma assembler. 


Sul lato 1 (Side 1) del disco di sistema viene fornito il programma BANKMAN.BAS. Se 
il programma viene eseguito dopo BASIC questo installerà il gestore di banchi RSX. 
Tale programma è noto come BANK MANAGER. 


Un uso della memoria del secondo lotto di 64K consiste nella memorizzazione 
temporanea degli schermi grafici. Una tale applicazione può includere, ad esempio, un 
programma di disegno che memorizza un numero di schermi diversi o un video gioco 
che ha diverse schermate grafiche. 


Un altro uso di tale memoria consiste nell’ampliare lo spazio di lavoro disponibile, il 
quale può essere visto come una estensione dello spazio di un vettore stringa o un 
semplice “disco RAM”. 
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Parte 1: Memorizzazione 
di schermi grafici 


Si scelga lo schermo... 


BANK MANAGER è in grado di commutare la sua attenzione dal Blocco 1 ad uno dei 
quattro blocchi del secondo lotto di 64K. Il diagramma sotto illustra proprio questo 
concetto. Si noti come ogni blocco del secondo lotto di 64K occupa lo stesso spazio 
indirizzabile (&4000 fino a &7FFF). Il contenuto del Blocco 1 (probabilmente la metà 
del proprio programma!) è riservato, ed è memorizzato quando BANK MANAGER ha 
terminato la propria esecuzione. Vi sono altri tre banchi di selezione possibili (oltre ai 
cinque mostrati qui sotto) ma essi sono utili solo alla implementazione di CP/M Plus. 


Selezione dei banchi hardware 


Il BANK MANAGER ha inoltre due comandi per spostare gli schermi di informazione 
tra un blocco e un altro. I Blocchi dal 4 al 7 vengono commutati automaticamente 
quando richiesto e la memoria mappata è lasciata insieme al Blocco 1 attivo. 
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Il comando: 
|SCREENSWAP.[<sezione schermo>,]<numero schermo>,<numero schermo> 
....Cambia i contenuti di due blocchi, mentre: 


|SCREENCOPY,[<sezione schermo>,]<numero schermo destinazione>,<numero 
schermo origine> 


... copia il contenuto di un blocco in un altro blocco. 


Il parametro opzionale <sezione schermo> fa sì che il software copi solo 1/64 di blocco 
(256 byte di 16K). Tale parametro, del resto, assume valori compresi tra 0 e 63. Questo 
modo operativo è utile se viene richiesto di interfogliare un qualunque altro processo con 
il movimento dello schermo. La modifica di schermo può avvenire in 150/300-esimi di 
secondo. 


Il <numero schermo> richiesto è 1 (schermo normale) e poi sia 2,3,4, o 5. Le operazioni 
di copia e di modifica quando lo schermo origine e quello destinazione è lo schermo 1 
saranno molto più veloci. Si faccia molta attenzione agli effetti hardware di rotazione 
dello schermo. Esso deve essere predisposto in modo che tutti gli schermi grafici siano 


visti con lo schermo 1 disposto nella stessa posizione hardware. La posizione più 
semplice (per difetto) è quella fissata da un comando MODE. 


Comandi di selezione dello schermo.... 


Si esegua, prima di tutto il programma BANK MANAGER presente sul lato 1 del disco 
di sistema, scrivendo: 


RUN “BANKMAN” 

Poi si scriva: 

MODE 1 

Lo schermo viene pulito. Si scriva ora: 


‘Questo è lo schermo originale 
|SCREENCOPY,3,1 ‘Invia lo schermo originale allamemoria 3 


CLS 
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Lo schermo viene nuovamente pulito. Si scriva ora: 


‘Questo è lo schermo intermedio 

|ISCREENCOPY,2,1 ‘Invia lo schermo intermedio allamemoria 2 
|SCREENSWAP,2,3 ‘Scambia lamemoria 2 ela 3 
|SCREENCOPY,1,3 ‘Ripristina lo schermo intermedio della memoria 3 
|SCREENCOPY,1,2 ‘Ripristina lo schermo originale dalla memoria 2 


Infine, l’ultimo parte del Capitolo 9 include un programma ‘Screen Design’ che 
incorpora le caratteristiche di scelta dello schermo di BANK MANAGER. 


Parte 2: Operazioni su pseudo-file 


Ancora i file... 


Quando si considera tutto il secondo lotto di 64K come un disco RAM, esso viene diviso 
in ‘fileRAM’ che comprende diversi recordi di lunghezza fissa. La lunghezza del record 
può assumere valori compresi tra 0 e 255 bytes, sebbene 2 byte sia la misura minima 
consigliata. Una volta stabilita la lunghezza del record RAM, si può accedere ad ogni 
record tramite il <numero RAMrecord>. E’ perfettamente accettabile la scrittura del file 
RAM usando una lunghezza di record e leggerla usando un’altra. 


NOTA: Il file RAM deve contenere solo dati; NON esiste una caratteristica che permetta 
di contenere istruzioni di programma. 


Come è comune con l’accesso al diso random, vi è qui il concetto di ‘numero di record 
attuale’. Ciò fornisce, in effetti, un numero di record per difetto, il quale è partico- 
larmente utile quando vi è un passaggio automatico nel file RAM. 

Il comando: 


|BANKOPEN, <lunghezza record RAM> 


«fissa la lunghezza di tutti i record, inizializza il record attuale a 0, ma NON pulisce la 
memoria. 


Il comando: 
|BANKOPEN,@c<codice di uscita>,<espressione stringa>[,<numero record RAM>] 


...Scrive l’<espressione stringa> nel file RAM. 
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Il <numero record RAM> specifica quale record deve essere scritto. Se il parametro 
viene omesso viene usato il numero di record attuale. Il numero di record attuale viene 
poi fatto puntare a quello seguente. 


Se l’<espressione stringa> non riempie completamente il record, i vecchi caratteri (che 
non sono stati sovrascritti) resteranno alla fine del record. Se l’<espressione stringa> è 
più lunga del record, i caratteri eccedenti verranno ignorati per evitare inserimenti nel 
record successivo. 


Il <codice di uscita> è una variabile intera che restituisce il numero del record scritto (se 
l’operazione si è conclusa con successo), o un numero negativo se l’operazione di 
scrittura non ha avuto esito. 


-1 Errore di fine file. Il numero di record richiesto eccede i 64K 
-3 Errore di selezione del banco. (Non deve mai accadere). 
Esempi: 


|BANKOPEN,10 
|]BANKWRITE,@r%,”123 testing”,0 
|BANKWRITE,@r%,w$ 


Il comando: 
|BANREAD,@c<codice di uscita>,@<stringa variabile>[,<numero record RAM>] 


...legge un record dal file RAM e lo pone nella <stringa variabile>. 


Il <numero record RAM> specifica quale record deve essere letto. Se il parametro viene 
omesso viene usato il numero di record attuale. Il numero di record attuale viene poi fatto 
puntare a quello seguente. 


Se i contenuti del record non riempiono completamente la <stringa variabile> i vecchi 
caratteri (che non sono stati sovrascritti) resteranno alla fine della <stringa variabile>. Se 
il record è più lungo della <stringa variabile>, i caratteri eccedenti verranno ignorati, in 
quanto è impossibile aumentare la lunghezza della stringa variabile in un comando 
esterno. 


Il <codice di uscita> è una variabile intera che restituisce il numero del record letto (se 
l’operazione si è conclusa con successo), un numero negativo se l’operazione di lettura 
non ha avuto esito. 


-1 Errore di fine file. Il numero di record richiesto eccede i 64K 
-3 Errore di selezione del banco. (Non deve mai accadere). 
Esempi: 


]BANKREAD,@r%,i$,0 
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Ricerca... 
E° possibile ricercare, nei record memorizzati, una voce particolare. 
Il comando: 


|,BANKFIND,@<codice di uscita>,<stringa da cercare>[,<numero record 
iniziale>[,<numero record finale>]] 


...Cercherà la stringa in tutti i record RAM. Il <numero record iniziale> specifica da quale 
record iniziare la ricerca. Se tale parametro viene omesso viene usato il numero di record 
attuale. 


La ricerca procederà, con passo <lunghezza record RAM> in tutto il secondo lotto di 64K 
fino a quando non si è trovata la voce cercata. 


Se si specifica il <numero record finale> la ricerca terminerà dopo aver confrontato tale 
record (a meno che non sia stato precedentemente trovato). 


Se la ricerca termina con successo il numero di record attuale viene fatto puntare nel 
record in cui è stata trovata la voce. 


Il <codice di uscita> è una variabile intera che restituisce il numero del record dove è stata 
trovata la voce (se l’operazione si è conclusa con successo), o un numero negativo se 
l’operazione non ha avuto esito. 

-1 Errore di fine file. Il numero di record iniziale o quello finale eccede i 64K 

-2 Non è stata trovata alcuna voce 

-3 Errore di selezione del banco. (Non deve mai accadere). 

La <stringa da cercare> può contenere caratteri jolly, ovvero CHR$(0) e il confronto 
viene fatto facendo riferimento o alla <lunghezza del record RAM> o alla lunghezza 
della <stringa cercata>, comunque sia corta. 


Esempi: 


|BANKFIND,@r%,”123 test”,0 
|BANKFIND,@r%,f$,100,200 
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Attenzione ai confronti... 


Errori ovvi, come il numero di parametri, vengono segnalati come errori ‘Bad Com- 
mand' (Comando errato). Comunque il meccanismo dei comandi esterni non scopre 
errori di tipo "Type mismatch' e l’utente deve assicurarsi che si sia impiegata la forma 
di parametri corretta. 


Il programma che segue usa i comandi del disco RAM per fissare ed interrogare un 
archivio contenente anagrammi di parole formate da 7 lettere. Esso cerca la voce 
richiesta ed è possibile usare i caratteri jolly. 


Ad esempio, gli anagrammi della parola FIGURES che potrebbe essere confrontato con 
?RUGS?? (gli ultimi due ?? possono essere tolti, se si desidera) sono FRUGSIE, 
FRUGSEI, IRUGSFE, IRUGSEF, ERUGSFI e IRUGSIF. 


L’archivio richiede del tempo per essere creato, ma 64K è molta memoria da riempire! 


10‘ANAGRAMMI di ROLAND PERRY 
20‘ copyright (c) AMSOFT 1985 
30‘ 


40 ‘Si ricordi di eseguire “BANKMAN"” prima di eseguire il programma 
60‘ 

70 MODE 2 

80 DEFINT a-z 

90 r%=0:|BANKOPEN,7 

100 INPUT “Quale parola di 7 lettere volete glianagrammi?;s$ 
110IF LEN/s$)<>7 THEN 100 

120 PRINT “Attendere perfavore...” 

130 LOCATE 1,5:PRINT”Sto calcolando:” 

140 FORc1=1 TO7 

150 FOR c2=1 TO 7 

160 IF c2=c1 THEN 370 

170 FOR c3=1 TO 7 

180 IF c3=c2 OR c3=c1 THEN 360 

190 FOR c4=1 TO 7 

200 IF c4=c3 OR c4=c2 ORc4=c1 THEN 350 

210 FOR c5=1 TO 7 

220 IF c5=c4 OR c5=c3 OR c5=c2 OR c5=c1 THEN 340 

230 FOR c6=1 TO 7 

240 IF c6=c5 OR c6=c4 OR c6=c3 OR c6=c2 OR c6=c1 THEN 330 
250 FOR c7=1 TO7 

160 IF c7=c6 OR c7=c5 OR c7=c4 OR c7=c3 OR c7=c2 OR c7=c1 THEN 320 


Continua nella pagina seguente 
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2700$=MID$(s$,c1,1)+MID$(s$,c2,1)+MID$(s$,c3,1)+MID$(s$,c4,1) 
+MID$(s$,c5, 

1)+MID$(s$,c6,1)+MID$(s$,C7,1) 

280 LOCATE 12,5: PRINT x;0$ 

290 |BANKWRITE,@r%,0$ 

300 IF r%<0 THEN STOP 

310x=x+1 

320 NEXT c7 

330 NEXT c6 

340 NEXT c5 

350 NEXT c4 

360 NEXT c3 

370 NEXT c2 

380 NEXT c1 

390 lastrec=r% 

400 REMora guardiamoli 

410r%=0:g$=SPACE$(7) 

420 PRINT:INPUT”Quale confronto vuoi fare: usa ? come carattere jolly: “,m$ 
430m$=LEFT$(m$,7) 

440 FOR x=1 TO LEN(m$) 

450 IF MID$(m$,x,1)="?" THEN MID$(m$,x,1)=CHR$(0) 
460 NEXT 

470 |BANKFIND,@r%,m$mo0,lastrec 

480 IF r%<0 THEN GOTO 420 

490 |[BANKREAD,@r%,9$ 

500 PRINT g$, 
510|BANKFIND,@r£,m$mr%+1,lastrec 

520 GOTO 480 
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Capitolo 9 
A vostra disposizione 


Questo capitolo permette di illustrare alcuni concetti del mondo dei 
calcolatori in generale e del 6128 in particolare. Non è necessario 
leggerlo primadi utilizzare il computer ma può aiutare a capire ciò che 
sta succedendo. 


Parte 1: In senso generale ... 
L’Arte del possibile 


Anche se si è acquistato il CPC6128 solo per giocare con i giochi disponibili, si potrebbe 
voler apprendere ulteriori aspetti su ciò che viene definito ‘hardware’. 


L’hardware è tutto ciò che si può prendere in mano e spostare: la tastiera del computer, 
il monitor, le connessioni, ecc. In effetti è tutto ciò che non viene chiamato software - 
programmi, manuali, informazioni contenute su cassette o dischi. 


Alcuni modi di comportamento del computer vengono permessi dalle possibilità 
dell’hardware, si pensi ad esempio al colore di un televisore o del monitor; è inoltre il 
software che utilizza l'hardware in modo da produrre caratteri e disegni sullo schermo. 


E’ l’hardware che conduce il raggio di elettroni sulla superficie luminescente dello 
schermo o del televisore; il software aggiunge ordine ed intelligenza indicando 
all’hardware quello che deve fare o come deve farlo. Aggiunge sincronizzazione, 
controllo e sequenza al fine ad esempio di produrre una astronave in partenza o qualcosa 
di più terrestre come i caratteri che appaiono sullo schermo quando vengono premuti 
determinati tasti. 


Cosa rende un computer migliore di un altro? 


L’hardware senza il software non ha valore. Il software senza l’hardware è anch’esso 
senza valore: il vero valore di un computer si dimostra quando entrambi interagiscono. 
Riguardo alla potenza di un calcolatore si possono fare alcune considerazioni fonda- 
mentali. 
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Le caratteristiche principali di un personal computer sono: 


1. Risoluzione dello schermo - il più piccolo oggetto che è possibile riconoscere sullo 
schermo. 


Questa è una combinazione di fattori, incluso il numero di colori diversi disponibili per 
il programmatore, il numero di aree che possono essere usate per la visualizzazione (i 
pixel) e il numero di caratteri di testo che possono essere visualizzati su uno schermo. 


Si troverà che il CPC6128 è eccellente, se lo si paragona con altri computer di prezzo 
simile. 


2. Interprete BASIC 


Tutti i personal computer, praticamente, includono un interprete BASIC che permette 
all’utente di creare programmi ed usare le caratteristiche hardware. Il linguaggio di 
programmazione incluso (BASIC) nel CPC è esso stesso un programma complicato che 
è stato sviluppato da molte persone negli Stati Uniti. Il ‘Beginners All-purpose Symbolic 
Instruction Code’ (Codice di istruzioni simboliche di uso generale per principianti) è il 
linguaggio maggiormente usato nel mondo, e come tutti i linguaggi ha diversi ‘dialetti’. 


La versione del CPC6128 è una delle più compatibili e potrà eseguire molti dei 
programmi scritti per il sistema operativo CP/M. E’ una velocissima implementazione 
del BASIC, esegue in altre parole calcoli in maniera velocissima: un computer può 
impiegare 0.005 secondi per moltiplicare 3 per 5 mentre un altro può impiegarne 0.075; 
un programma che disegna grafici può impiegare 0.05 secondi per ripetere cento volte 
un calcolo ripetitivo, un altro computer potrebbe impiegarne 0.075: pochi secondi in più 
costituiscono una considerevole differenza di prestazioni. 


Si potrà spesso sentir parlare di ‘codice macchina”. Il codice macchina è una forma di 
istruzione in: codice che viene inviata al processore. Questa richiede meno tempo per 
essere elaborata e permette di aumentare da 5 fino 15 volte la velocità rispetto ad un 
normale interprete BASIC. Ma occorre un tempo superiore dalle 5 alle 50 volte per 
scrivere un programma in codice macchina invece che in BASIC. 
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Il BASIC AMSTRAD è trai più veloci e ben dotati: incorpora molte caratteristiche utili 
per gli esperti di programmazione BASIC che potranno superare la lentezza 
dell’interprete di un linguaggio ad alto livello per ottenere effetti visivi e sonori 
sorprendenti. 


3.Espandibilità 


Molti computer hanno bisogno di ulteriori strumenti hardware: stampanti, joystick, 
dischi. Paradossalmente la maggior parte dei computer domestici più di successo hanno 
bisogno di ‘interfacce di espansione’ prima di poter installare una stampante o un 
Joystick. 


L’acquirente non sempre pensa all’immediato futuro, in quanto una macchina che 
include una porta per stampante parallela (Centronics compatibile) e per joystick può 
essere, alla fine dei conti, meno cara. 


Tra le caratteristiche del CPC6128 va inclusa la porta Centronics, una porta per un 
secondo disco, una presa per registratore e per il controllo del motore, la possibilità di 
aggiungere due joystick, una uscita del suono stereo, ecc, oltre ad un bus di espansione 
che può essere usato per collegare una interfaccia seriale (RS232C), un MODEM, un 
sintetizzatore vocale (AMSTRAD SSA2), una penna ottica, ecc. 


4. Suono 


Le caratteristiche sonore di un computer determinano se il computer suona in maniera 
sorda o produce una accettabile rappresentazione degli strumenti musicali. 


Il CPC6128 usa un generatore sonoro a tre canali e 8 ottave che può produrre una qualità 
musicale accettabile con un controllo completo degli inviluppi di ampiezza e tono. 
Inoltre, il suono è in stereo dove un canale fornisce l’uscita sinistra e l’altro la destra: il 
terzo canale si trova nel mezzo. 


Ciò fornisce una vasta gamma di possibilità di effetti sonori quando ad esempio si 
scrivono programmi di giochi. 


Abbiamo terminato di fornire una idea delle caratteristiche: deciderà l’utente se sono 
importanti per lui. Speriamo comunque, che l’utente le voglia provare ed ottenere il 
massimo dal computer. 
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Cosa posso fare? 


Con tutte le potenti tecnologie elettroniche gli utenti si chiedono frequentemente come 
mai anche una macchina avanzata come il CPC6128 non può apparentemente visua- 
lizzare ad esempio i tipi di figura che appaiono su un televisore. Perchè un computer non 
può animare una figura, come ad esempio un uomo che cammina, sullo schermo in 
modo naturale? Perchè tutti i computer rappresentano i movimenti con figure che 
sembrano ‘robot’? 


La risposta è complessa. Una risposta semplicistica sarebbe quella di dire che lo schermo 
di un computer non ha nulla a che fare con lo schermo di un televisore. Un televisione 
opera usando informazioni lineari che descrivono un’area infinita di risoluzioni tra gli 
estremi ‘luce’ e ‘scuro’ di tutti i colori di uno spettro. Questo processo, in termini del 
computer, implica che la ‘memoria’ di visualizzazione di una figura sul televisore è 20 
volte maggiore se paragonata con una analoga sul video del computer. 


Questa è solo una parte del problema, poichè l’animazione di una figura richiede una 
enorme quantità di memoria che deve essere elaborata ad una velocità elevata (50 volte 
al secondo). Tutto ciò può essere svolto da macchine che costano molti milioni in più 
di un normale personal computer! 


Fino a quando il costo della memoria non crollerà i piccoli computer dovranno avere a 
che fare con quantità di memoria relativamente piccole per controllare lo schermo: ciò 
comporterà una bassa risoluzione e movimenti ‘goffi’. Sebbene un hardware ottima- 
mente progettato possa fare il meglio non potrà comunque competere con i computer 
che possono produrre movimenti del tipo dei cartoni animati. 


Questa tastiera mi sembra di conoscerla ... 


Perchè non si può accendere il computer e scrivere immediatamente e semplicemente 
una pagina di testo? 


Non ci si faccia ingannare dal fatto che la tastiera del computer assomiglia a quella di 
una macchina per scrivere. Lo schermo non è un foglio elettronico, è una console di 
comando: questo significa che aiuta a far comunicare l’utente con la memoria della 
macchina mediante un linguaggio di programmazione. 


Fino a quando non gli si indichi di fare diversamente, il computer cercherà di eseguire 
tutto quello che viene immesso alla tastiera come se fosse una istruzione di un 
programma. Quando si preme il tasto [RETURN] il computer cercherà di scoprire se in 
ciò che si è inserito ci sia qualche cosa che abbia senso per BASIC in caso contrario 
commenterà: 


Syntax error 
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Comunque potrebbe accadere che il programma residente in memoria è in realtà un 
elaboratore di testi, in tal caso è possibile inserire parole a caso, premere [RETURN] e 
scrivere tutto ciò che si vuole come se lo si facesse su una macchina per scrivere. Ma per 
far ciò si deve aver caricato in memoria un programma di elaboratore testi. 


Un computer ‘sembra’ unire insieme diversi oggetti di uso quotidiano come il televisore 
e la macchina per scrivere: occorre ricordarsi comunque che queste similitudini sono 
superficiali e che il computer ha una personalità completamente diversa. 


a Danndo 
(ad 
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Chi ha paura del “gergo”? 


Così come tutte le discipline, il mondo dei calcolatori ha sviluppato un proprio 
linguaggio come forma di abbreviazione per concetti complicati che richiedono più 
parole per essere spiegati. Non è solo l’alta tecnologia colpevole di nascondersi dietro 
una apparente cortina di fumo o ‘ronzii di parole’, gergo e terminologia; quanti di noi 
si sono scontrati con le barriere della comprensione, che esistono in tutti i campi della 
vita?. 


La maggiore differenza tra i gerghi sorge dal modo con cui le parole vengono usate 
piuttosto che dal loro significato stesso. La maggior parte delle persone che diventano 
familiari con la terminologia del calcolo adotterà un modo personale di uso delle parole, 
il più diretto possibile, al fine di minimizzare la complessità della comunicazione. 


Non bisogna sentirsi ingannati da tale ‘linguaggio chiaro’ usato nel calcolo, non è un 
oggetto letterale ma una scienza precisa, separata dalla ‘sintassi’ delle parole; la struttura 
della comunicazione è molto diretta, e non confusa o ambigua. Gli insegnanti di 
informatica non hanno cercato di rendere ciò una forma d’arte cercando di analizzare 
il significato esatto di una parola secondo quello che intende un programmatore nella 


costruzione di un programma. 


Avendo detto ciò, sia che il significato di programma sia o meno noto, vi sono ancora 
diversi aspetti che possono essere analizzati sia in modo elegante che disordinato, ed è 
stata data più importanza ad un approccio formale nella costruzione di un programma 
ora che il danno inizialmente portato dalla micro rivoluzione si è stabilizzato. 


Il calcolo viene appreso rapidamente da molte persone giovani che apprezzano la 
precisione e la semplicità delle idee ed il modo con cui queste possono essere 
comunicate; non si troveranno molti ragazzi di dieci anni avvocati, ma sarà possibile 
trovare molti programmatori! 
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Le basi del BASIC 


Quasi tutti i computer domestici forniscono un linguaggio noto come BASIC il quale 
permette di ottenere programmi scritti nel modo migliore e con un linguaggio semplice 
e subito disponibile. BASIC è un abbreviazione di ‘Beginners All-purpose Symbolic 
Instruction Code’: molti programmi estremamente complessi e potenti sono scritti 
usando BASIC. 


Comunque non c’è dubbio che il nome ha attratto molti principianti per la promessa di 
fornire un punto di partenza nel labirinto dei linguaggi di programmazione e ha 
contribuito notevolmente alla sua divulgazione. 


BASIC è un linguaggio di programmazione che interpreta una gamma di comandi 
permessi ed esegue le operazioni sui dati in fase di esecuzione del programma. 
Diversamente dal vocabolario umano che comprende dalle 5000 alle 8000 parole (oltre 
alle varie desinenze dei verbi che si possono usare, ecc) il BASIC ne possiede duecento. 
I programmi scritti usando BASIC devono seguire regole rigide riguardanti l’uso di tali 
parole. La sintassi è precisa e qualsiasi tentativo di comunicazione con il computer 
mediante l’uso di espressioni letterali o colloquiali darà come risultato un freddo 
messaggio: 


Syntax error 
ovvero errore di sintassi. 


Ciò non è restrittivo come potrebbe sembrare ad un primo momento poichè il linguaggio 
BASIC (la sua sintassi) è progettato prima di tutto per trattare numeri, dati numerici. Le 
parole sono essenzialmente una estensione dei familiari operatori aritmetici */- ecc, e il 
concetto più importante da comprendere dai principianti è quello che un computer 
lavora solo con un dato numerico: informazione che è fornita al Processore Centrale 
(circuito integrato) solo sotto forma di dati numerici. 


Numeri per favore! 


Se un computer viene usato per memorizzare tutto il lavoro di Shakespeare, nel sistema 
non si troverà una sola lettera o parola. Ogni informazione viene prima convertita in un 
numero che il computer può localizzare e successivamente trattare come richiesto. 


BASIC interpreta le parole come numeri che il computer può successivamente trattare 
usando solo l’addizione, la sottrazione ed alcune caratteristiche Booleane che permet- 
tono di confrontare dati e selezionarne altri in base a determinati attributi: cioè 
controllare se un numero sia più grande o uguale ad un altro, o eseguire un particolare 
compito se un numero 0 un altro incontra una certa scelta. 


Mediante il programma il computer suddivide ogni compito in una semplice serie di 
operazioni che implicano due sole risposte : SI o NO. 
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Che tale processo sembri scomodo non è del tutto sbagliato, poichè si è appena scoperta 
una delle più importanti verità riguardo il calcolo. Un computer è prima di tutto uno 
strumento per l’esecuzione di compiti semplici e ripetitivi in modo veloce e con 
precisione assoluta. Così BASIC interpreta le istruzioni fornite sotto forma di pro- 
gramma e le traduce nel linguaggio che può essere usato dalla CPU. Solo due stati 
vengono compresi dalla logica del computer: ‘si’ o ‘no’ rappresentati in notazione 
binaria da ‘1’ e ‘0’. La rappresentazione Booleana è semplicemente ‘vero’ e ‘falso’, non 
vi sono espressioni come ‘possibile’ o ‘forse’. 


Il processo di commutazione tra questi due stati distinti è l'essenza del termine digitale. 
Nella natura la maggior parte dei processi si muovono gradualmente da uno stato 
completamente ‘stabile’ in un altro in una progressione omogenea. In altre parole la 
transizione è fatta seguendo il percorso di una linea tra due stati; in un ambiente digitale 
ideale la commutazione da uno stato al seguente avviene istantaneamente, ma la fisica 
dei semiconduttori porterà un ritardo a cui si fa riferimento come ritardo di propaga- 
zione; è l’accumulazione di molti di questi ritardi la ragione per cui il computer impiega 
del tempo per fornire una informazione. 
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In qualsiasi caso, il computer deve attendere che un compito venga finito prima che un 
secondo possa usare il risultato del primo: quindi ci dovrebbe essere comunque un 
ritardo imposto. Il processo digitale è nero o bianco dove i periodi nella transizione 
mediante sfumature di grigi non hanno significato. La progressione analogica o lineare 
utilizza varie sfumature di grigio. 


Se in definitiva la risposta è 0 o 1, non vi è possibilità che sia ‘quasi’ corretta. In effetti 
può sembrare a volte che il computer faccia degli errori nel trattamento dei dati numerici 
a causa della limitazione della dimensione dei numeri che esso può utilizzare; in altre 
parole, numeri molto grossi o molto piccoli dovranno essere ristretti all’interno dello 
spazio standard che è stato loro assegnato e ciò porta ad errori di arrotondamento per cui 
999.999.999 può diventare 1.000.000.000. 


In altre parole dove vi sono solo due numeri disponibili, 0 e 1, come si può contare dopo 
l’uno? 


Bit e byte 


Abbiamo appena accennato all’uso dei numeri basati sul sistema decimale nel quale il 
punto di riferimento è 10, vi sono cioè dieci cifre disponibili per rappresentare quantità 
le quali vanno da 0 a 9 (che sono prevalentemente usate da 1 a 10). Il sistema in cui la 
gamma di numeri va da 0 a | è il sistema binario e le cifre del sistema sono dette bit, una 
abbreviazione di ‘BInary digiT” (cifra binaria). 


La relazione tra bit e notazione decimale è semplice da comprendere: 


E’ convenzione attuale dichiarare il numero massimo di cifre binarie usate aggiungendo 
all’inizio del numero alcuni zeri 


7 decimale diventa 
00111 binario 
usando 5 bit di notazione 


Nel sistema binario, le cifre possono essere considerate semplicemente come indicatori 
in colonne per specificare se deve o meno venir fornita la potenza di due 


2°=1 
2!=2=2=2(29) 
23=4=2x2=22") 
2°=8=2x2x2=2(22) 
24=16=2x2x2x2 = 2(27) 
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quindi la colonna apparirà 


2% 2%. Di 2h 20 
1 0 0 1 1 
(16 0 0 2 1)= 19 


AI fine di fornire un metodo per abbreviare il riferimento a una in cifra binaria, viene 
usato il termine byte che denota 8 bit di informazione. Il numero più alto che può essere 
memorizzato in un byte è (binario) 11111111 o (decimale) 255. Ciò implica 256 
variazioni incluso 00000000, che è ancora un dato valido per un computer. 


I computer tendono a trattare dati in multipli di 8 bit. 256 non è un numero molto grande. 
Quindi, per ottenere un metodo accettabile per gestire la memoria, si usano due byte al 
fine di fornire un metodo di indirizzamento della memoria sotto forma di vettore, con 
un indirizzo orizzontale ed uno verticale mediante il quale gli elementi del vettore 
possono essere localizzati: 


Questo vettore può contenere (10x10) oggetti di informazione usando i numeri di 
indirizzo compresi nel campo 1-9. L'oggetto memorizzato nella posizione 3,5 è ‘1’, così 
come l’oggetto nella posizione 5,5. 


Quindi un vettore binario di 256x256 può trattare 65.536 locazioni usando un indirizzo 
ad 8 bit per gli assi verticali e orizzontali del vettore. Quindi il nostro ‘0’ e il nostro ‘1’ 
sono progrediti rendendosi in grado di identificare uno dei 65.536 elementi. 
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Il livello successivo di abbreviazione in notazione binaria è kilobyte (kByte o semplice- 
mente ‘K’) il quale è formato da 1024 byte. 1024 è il multiplo binario più vicino alla 
nostra notazione di ‘chilo’ e spiega perchè un computer descritto *64K’ di memoria ha 
in effetti una memoria di 65.536 byte (64x1024). 


Grazie all’interprete BASIC non è necessario effettuare conversioni ed è possibile essere 
dei bravi programmatori senza conoscere il sistema binario. Ma una valutazione del 
significato binario aiuterà a distinguere i molti ‘magici’ o significativi numeri che 
inevitabilmente salteranno fuori nel corso del lavoro. 


E’ bene apprendere il sistema binario e i vari significati dei numeri 255, 1024, ecc. 
poichè è molto improbabile che questi cambieranno in futuro. La certezza e la semplicità 
derivante dal lavoro con solo due stati prevarrà notevolmente sulla complessità 
derivante dall’uso di altri numeri base. 


Comunque... 


Semplice o elegante che sia, il sistema binario è prolisso e comporta imprecisioni poichè 
non può esssere letto facilmente con una occhiata. Il codice binario ha un certo numero 
di codici associati che agiscono come abbreviazione per i programmatori. Uno di tali 
codici, ampiamente usato nei microcomputer, è detto Esa (abbreviazione di esadeci- 
male). 


Il numero è basato sul 16 ed è rappresentato da un solo carattere: 

Decimale 

01234567891011121314 15 

Esa 

0123456789A BC DEF 

Il sistema esadecimale può suddividere gli otto bit di un byte in due blocchi di quattro 
bit poichè 15 è il numero a quattro bit: 1111 binario. Il primo blocco indica il numero 


di unità di ‘15° complete, il secondo indica il resto; è in questo caso che emerge 
l’eleganza del sistema binario e delsistema esadecimali. 
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Riconsideriamo la tabella introdotta nella notazione binaria. 


Decimale inari Esadecimale 


00 HAHN N1DWLN-_O 


0 
1 
2 
3 
4 
») 
6 
7 
8 
9 
A 
B 
C 
D 
E 
F 
10 


Il numero a 8 bit 11010110 può essere suddiviso e considerato come due numeri a 4 bit 
noti come nibbles, Hex D6. In questa guida un numero basato su notazione esadecimale 
verrà introdotto con un simbolo ‘&’ cioè &D6, questo è il numero maggiormente usato 
dai programmatori che usano tecniche di linguaggio assembler. Un programma in tale 
linguaggio è più vicino alla programmazione in codice macchina in quanto tale 
linguaggio permette di usare semplici lettere ‘mnemoniche’ per specificare i ‘numeri’ 
effettivi di codice macchina. 


Quando si usano numeri esadecimali, occorre prima di tutto calcolare il valore della 
prima cifra per ottenere il numero di “16” contenuti nel numero finale, e succes- 
sivamente aggiungere la seconda ‘metà’ della notazione esadecimale per ottenere il 
numero decimale equivalente. Si può essere tentati di considerare il numero &D6 come 
13+6, o 136. Ma è (13x16)+6=214 


E° lo stesso processo che si usa quando si legge un numero decimale come ‘89’, ovvero 
(8x10)+(9). Moltiplicare per dieci è notevolmente più semplice a meno che non si è fatta 
molta pratica moltiplicando per 16. 
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Se si è appreso tutto ciò senza fare troppa confusione allora si è in grado di apprendere 
le basi del calcolo. Ci si potrebbe essere resi conto che tutto lo scalpore è qui: il che non 
è del tutto sbagliato. Il computer è un gestore che dirige in modo semplice concetti ed 
idee: si possono eseguire compiti ad una velocità elevata (milioni di volte per secondo) 
e con una smisurata capacità di ricordare sia i dati inseriti che i risultati intermedi delle 
migliaia di semplici somme che producono il risultato. 


Se si desidera imparare di più sulla teoria del mondo dei computer vi sono centinaia di 
libri disponibili su tale soggetto. Alcuni tendono a provocare più confusione di quella 
che si aveva all’inizio di tale lettura e pochi rivelano realmente la semplicità e la relazione 
esistente tra i sistemi numerici ed il modo con cui il computer li tratta. 
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Parte 2: In particolare sul CPC6128 


Questa parte spiega alcuni aspetti più specifici del 6128. Le informazioni 
necessarie per comprendere questi argomenti sono state presentate nel 
corso introduttivo e nel capitolo che riporta l’elenco completo delle 
parole chiave del BASIC del CPC6128. 


Argomenti trattati in questa parte: 


* Set di caratteri 

* ASCII 

* Variabili 

* Logica 

* Caratteri definibili dall’utente 
* Formattazione della stampa 

* Finestre 

* Interruzioni (interrupts) 

* Dati 

* Suono 

* Grafica 

* Grafica utilizzando la seconda parte della memoria 


Un po’ di caratteri 


Premendo i tasti del CPC6128 non dovreste essere sicuri che ciò che apparirà sullo 
schermo siano necessariamente numeri e lettere riconoscibili. Dopotutto abbiamo 
appena detto che il computer non è una macchina per scrivere. Ciò che accade effettiva- 
mente è il risultato della pressione di interruttori elettrici. I segnali elettrici prodotti 
premendo tali interruttori vengono tradotti dai circuiti che compongono la macchina, i 
quali a loro volta producono un insieme di punti sullo schermo. Noi riconosciamo questi 
gruppi di punti come lettere, numeri o altri caratteri del set di caratteri del 6128. 
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Alcuni dei caratteri non sono accessibili direttamente mediante la pressione di un tasto 
ma possono essere visualizzati usando l’istruzione PRINT CHR$(<numero>). Ciò 
avviene perchè ogni elemento contenuto nella memoria del computer è contenuto in una 
unità chiamata byte e, come abbiamo già visto nella parte 1 di questo Capitolo, un byte 
può contenere 256 diverse combinazioni di valori. Dal momento che il computer deve 
utilizzare almeno un byte per ogni carattere che può utilizzare (che lo si voglia o no, questa 
è la parte più piccola che il 6128 può riconoscere), potremo usare tutte le 256 possibili 
combinazioni invece di accontentarci dei circa 96 caratteri standard che possono essere 
stampati da una macchina per scrivere. 


Tali caratteri standard costituiscono solo un sottoinsieme dei caratteri generabili. Questo 
viene indicato come il sistema ASCII, un termine derivato da “American Standard Code 
fo Information Interchange”, un sistema di codifica che fa in modo che i caratteri inviati 
da un computer possano essere riconosciuti da un computer che riceve dal primo dei dati. 
Esiste nel manuale un capitolo di riferimento contenente tutti i caratteri ASCII e tutti i 
caratteri aggiuntivi utilizzati dal 6128, insieme ai corrispondenti codici. 


Come mai abbiamo parlato di queste cose ... 
Probabilmente si sarà già visto questo programma: 


10 FOR n=32 TO 255 
20 PRINT CHR$(n); 
30 NEXT 


... che chiede al computer di visualizzare tutti i caratteri utilizzabili. Passiamo ora ad 
esaminare il programma: 


La prima cosa da notare è che non si è chiesto al computer di stampare i caratteri con una 
istruzione come PRINT “abcdefghijkIm.....ecc” ma PRINT CHR$(n). n rappresenta 
semplicemente una variabile; la scelta della lettera è arbitraria e la n è semplicemente la 
preferita dai matematici in questo campo. Una variabile è semplicemente un oggetto che 
contiene una informazione che può variare in dipendenza dalle istruzioni che compon- 
gono il programma. 


Che cos’è una variabile ? 


Un numero come 5 è fissato e si trova tra il 4 ed il 6 e quindi non è una variabile; il carattere 
n è anch'esso fissato (è una lettera dell’alfabeto). 
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Quindi come fà il computer a distinguerle? Se la lettera n è intesa come carattere 
alfabetico, dobbiamo racchiuderla tra virgolette come in “n”, ed il computer avrebbe 
risposto con il messaggio Syntax error in quanto non può comprendere la sequenza FOR 
“n"=32 TO 255. 


Usando la n come abbiamo fatto, abbiamo detto al computer che n è una variabile. Per 
definizione, in BASIC il comando FOR deve essere seguito dal nome di una variabile e 
quindi il computer assume che qualunque cosa segua un FOR lo sia. 


Abbiamo anche detto al computer n=32 to 255. Abbiamo così stabilito che la variabile 
può assumere valori in sequenza tra 32 e 255. 


Dopo aver dichiarato questa variabile, dobbiamo dire al computer cosa farne e la linea 
successiva fà proprio questo: 


20 PRINT CHRS$(n); 


Questa linea dice al computer di convertire il valore numerico assegnato ad n nel carattere 
con il numero corrispondente e di stamparlo. 


Il punto e virgola alla fine di questa riga, indica al computer di non andare a capo come 
accadrebbe normalmente in modo che i caratteri vengano stampati uno in fianco all’altro 
e non uno sotto l’altro. 


La linea successiva indica al computer che, quando ha effettuato l’operazione con il primo 
numero della sequenza, deve tornare alla linea dove si trova il FOR ed effettuare la stessa 
operazione con il prossimo (NEXT) valore assegnato alla variabile n. Questo processo 
è noto con il nome di ciclo ed è uno degli aspetti più importanti dell’utilizzo e della 
programmazione dei computer. Esso permette di evitare di immettere lunghe e ripetitive 
sequenze di comandi e si imparerà presto ad utilizzarlo nei propri programmi. 


Quando il ciclo FOR raggiunge il limite specificato (255), l’operazione termina ed il 
computer prosegue l’esecuzione con la prima linea dopo la linea 30; ma non ve sono e 
dunque viene terminata l’esecuzione e viene ripresentato il prompt Ready. Il prompt 
indica che il computer è pronto (ready) ad accettare ulteriori informazioni; è anche 
possibile immettere nuovamente un RUN e ripetere l’esecuzione del programma. Il 
programma è memorizzato al sicuro nel computer e rimarrà là finché non si dice al 
computer di memorizzarlo altrove o finché non si spegne il computer. 


Questo programma illustra un aspetto fondamentale dei computer: tutto quello che essi 
fanno è in relazione con i numeri. Il computer ha visualizzato l’alfabeto (insieme ad altri 
caratteri) usando un numero per identificare ciascun carattere. Quando si preme il tasto 
A, non si chiede al computer di stampare una A sullo schermo ma di ricercare nella sua 
memoria le informazioni necessarie a stampare la lettera A sullo schermo. L’effettiva 
posizione di questo dato è definita dal codice numerico attivato dalla pressione del tasto. 
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Ogni carattere corrisponde ad un numero; questi sono elencati nella Parte 3 del Capitolo 
di riferimento. 


In modo simile i caratteri visualizzati non hanno nulla a che vedere con la scrittura della 
lettera sullo schermo, ancora una volta si tratta solamente di numeri. 


Ad esempio, il codice della lettera A è 97. Il computer non può comprendere il numero 
97 così com'è e quindi il numero deve essere convertito in un formato gestibile dal 
computer: il codice macchina. I principi riguardanti quest’aspetto della macchina si sono 
discussi precedentemente in questo Capitolo. 


AI primo impatto, la traduzione dal codice decimale a quello esadecimale potrà risultare 
piuttosto difficile. Pensare a numeri basati su dieci unità è così naturale che fare in un altro 
modo è come cercare di mangiare con il coltello e la forchetta scambiati nelle mani. 


Occorre un buon grado di scaltrezza mentale per comprendere la notazione esadecimale; 
una volta compresa questa, molte cose riguardanti i calcolatori diverranno più chiare ed 
apparirà in modo più chiaro la struttura del sistema di numerazione. 


Una volta che il computer ha convertito la pressione del tasto A nel tipo di numeri da esso 
conosciuti ricerca nella parte di memoria indicata ed il risultato è un’altra serie di numeri 
che definiscono il carattere. In pratica il carattere visualizzato sullo schermo è costituito 
da un blocco di dati, memorizzato in forma di matrice numerica. 


Matrice vuota di un carattere a minuscola A maiuscola. 


Gli elementi della matrice sono righe e colonne di punti. Il carattere viene visualizzato 
accendendo o spegnendo i punti appropriati; ogni punto è determinato dai dati memoriz- 
zati nella memoria del computer. Vi sono 8 righe di 8 punti in ogni carattere del CPC6128 
e, se non si trova il carattere desiderato nel set di 256 di cui è dotata la macchina, è 
possibile definirne di propri usando la parola chiave SYMBOL presentata più avanti in 
questo Capitolo. 
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I caratteri definibili dall’utente usano una qualunque combinazione dei 64 punti che 
costituiscono la matrice. Perciò, costruendo tutte le possibili combinazioni dei punti di 
un carattere, è possibile creare molti più elementi (caratteri). Si aggiunga a ciò il fatto che 
è possibile raggruppare diversi elementi per formare blocchi di maggiori dimensioni e si 
vedrà che le possibilità dei caratteri definibili dall’utente sono solo limitate dal tempo che 
si ha a disposizione e dal proprio ingegno. 


Logica ... 


La differenza principale tra una calcolatrice e il computer è la capacità di quest’ultimo di 
trattare operazioni logiche in applicazioni tipo sequenze condizionali IF...THEN. Per far 
ciò gli operatori logici trattano i valori a cui sono applicati come bit ed operano sul bit 
individuale. La descrizione e l’uso è totalmente logico: ma è notoriamente difficile 
descrivere la logica in termini semplici senza la precisione di definizioni concise. 


Le due parti di una espressione logica sono note come argomenti. Una espressione logica 
comprende: 


<argomento>[<operatore logico><argomento>] 
dove: 
<argomento> è: NOT <argomento> 
oppure : <espressione numerica> 
O :<espressione relazionale> 


o : (<epressione logica>) 


Entambi gli argomenti di un operatore logico sono costretti in una rappresentazione intera 
e se l’intero non è compreso nell’area ammessa viene visualizzato Error 6. 


Gli operatori logici, in ordine di precedenza con cui vengono applicati ai bit sono: 
AND restituisce 0 a meno che entrambi gli argomenti dei bit non siano 1 

OR restituisce 1 a meno che entrambi gli argomenti dei bit siano 0 

XOR restituisce 1 a meno che entrambi gli argomenti dei bit siano uguali 

AND è l’operatore logico più usato: 

PRINT 10 AND 10 

... darà come risultato 10 


PRINT 10 AND 12 


Restituirà 8 


Capitolo 9 Pagina 18 A vostra disposizione 


PRINT 10 AND 1000 


Restituirà ancora 8 


Questo a causa del fatto che i numeri 10 e 1000 sono stati convertiti in rappresentazione 
binaria: 

1010 
1111101000 


L’operatore AND controlla ogni corrispondenza di bit alla volta e quando il bit in cima 
ed in fondo alla riga è 1 la risposta è 1. 


0000001000 


... Il quale viene convertito in notazione decimale dà come risultato 8. Tutto ciò significa 


che l’operatore logico AND viene usato per scoprire se due condizioni si presentano 
simultaneamente. Ecco un programma autoesplicativo: 


10 INPUT “Numero del giorno”;giorno 

20 INPUT “Numero del mese”;mese 

30 IF giorno=25 AND mese=12 THEN 50 
40 CLS:GOTO 10 

50 PRINT “Buon Natale!” 


Anche OR opera sui bit, ma con esso il risultato è 1 a meno che entrambi i bit degli 
argomenti siano 0, nel qual caso il risultato è 0. Usando gli stessi numeri dell’esempio 


AND: 


PRINT 1000 OR 10 
1002 


Bit a bit 


1010 
1111101000 


Fornisce come risposta: 
1111101010 


Ecco un programma di esempio: 


10 CLS 

20 INPUT “Numero del mese”;mese 

30 IF mese=12 OR mese=1 OR mese=2 THEN 50 
40 GOTO 10 

50 PRINT “Dev’essere inverno” 
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L’operatore NOT inverte ogni bit del suo argomento (0 diventa 1 e viceversa): 


10 CLS 

20 INPUT “Numero del mese”;mese 

30 IF NOT (mese=6 OR mese=7 OR mese=8) THEN 50 
40 GOTO 10 

50 PRINT “Non può essere estate!” 


Un'altra caratteristica fondamentale è quella che consiste nell’unire insieme le diverse 
condizioni logiche: 


10 INPUT “Numero del giorno”; giorno 

20 INPUT “Il numero del mese”; mese 

30 IF NOT(mese=12 OR mese=1) AND giorno=29 THEN 50 

40 CLS:GOTO 10 

50 PRINT “Questo non è nè Dicembre nè Gennaio ma potrebbe essere un anno 
bisestile” 


Il risultato dell’espressione relazionale è 1 o 0. La rappresentazione del bit per 1 è tutti 
i bit interi uguali a 1; per 0 tutti i bit di interi sono 0. Il risultato di una operazione logica 
su due di tali argomenti conterrà 1 per Vero o 0 per Falso. 


Controlliamo ciò aggiungendo al programma la linea 60: 


60 PRINT NOT(mese=12 OR mese=1) 
70 PRINT (mese=12 OR mese=1) 


Quando eseguiamo il programma inserendo 29 come giorno e 5 come mese si produrrà 
nella linea 50 la risposta e i valori effettivi verranno restituiti dalle espressioni logiche 
nelle linee 60 e 70. 


Infine XOR (OR esclusivo) produce un risultato Vero se i suoi argomenti sono diversi. 


La seguente tabella riassume tutte queste caratteristiche ed è nota come tabella di verità. 
E’ un modo comodo per comprendere ciò che avviene nelle operazioni bit a bit. 


Argomento A 1010 
Argomento B 0110 


risultato AND 0010 
risultato OR 1110 
risultato XOR 1100 


Capitolo 9 Pagina 20 A vostra disposizione 


Caratteri definibili dall’utente 


Uno dei primi utilizzi dei numeri binari che certamente si incontrerà, riguarda il disegno 
dei caratteri da utilizzare con il comando SYMBOL. Se il carattere viene disegnato in una 
griglia 8x8, ognuna delle 8 righe dovrà essere convertita in un numero binario inserendo 
un l perogni pixel che dovrà essere colorato e 0 per ogni pixel trasparente (del colore della 
carta). Questi 8 valori vengono utilizzati dal comando SYMBOL. Ad esempio, per 
definire un carattere con una casetta: 


ti = 00001000 = &08 =8 =8 

#*** — =00111100 =&3C = 32+16+8+4 = 60 
* * =01000010 =8&42 = 64 +2 = 66 
** ** =10100101 =&A5 = 128 +32 44 +1 = 165 
È * =10000001 =&81 = 128 +1=129 
***** 10110101 =&B5 = 128 +32+16 +4 +1 = 181 
*** * =10110001 =8&BI = 128 +32+16 +1 =177 
PERSE atti = &FF = 128+64+32+16+8+4+2+1 = 255 


.. Il comando è: 

SYMBOL 240,8,60,66,165,129,181,177,255 

0% 

SYMBOL 240,&08,&3C,&42,&A5,&81,&B5,&B1,&FF 
0 


SYMBOL 240,&X00001000, &X00111100, &X01000010, &X10100101, 
&X10000001, —&X10110101, &X10110001, &X11111111 


Per stampare il carattere così definito si usa: 


PRINT CHR$(240) 

Infine, per raggruppare più caratteri, si può specificare 
coppia$=CHR$(240)+CHR$(240) 

PRINT coppia$ 


ne Qua 


via$=STRING$(15,240) 
PRINT via$ 


Altre notizie su PRINT 


PRINT è uno dei primi comandi che si impara ad utilizzare. E’ anche uno dei comandi 
BASIC che effettivamente fa ciò che dice, PRINT in inglese vuol dire stampa. Riguardo 
a PRINT vi sono però molte più considerazioni di quanto possa sembrare in un primo 
momento; ad esempio DOVE bisogna stampare? e COME bisogna stampare? 


A vostra disposizione Capitolo 9 Pagina 21 


Formattazione della stampa 


E’ possibile usare il comando PRINT in vari modi. Il più semplice consiste nel farlo 
seguire dall’oggetto che deve essere stampato. Questo oggetto può essere un numero, una 
stringa o il nome di una variabile. 


PRINT 3 
3 


PRINT “ciao” 
ciao 


a=5 
PRINT a 
5 


a$="prova” 
PRINT a$ 
prova 


In uno stesso comando PRINT è possibile inserire più oggetti, separati da un separatore, 
da TAB o da SPC. I separatori utilizzabili sono la virgola ed il punto e virgola. Il punto 
e virgola causa la continuazione della stampa sulla stessa riga ed immediatamente dopo 
l’ultima posizione di stampa. La virgola provoca lo spostamento alla zona successiva. 
L'ampiezza iniziale della zona è 13, ma può essere cambiata usando il comando ZONE. 


PRINT 3;-4;5 
3-4 5 


PRINT “ciao “;”ciao” 
ciao ciao 


PRINT “ciao”,”ciao” 
ciao ciao 


PRINT 3,-4,5 
3 -4 5 


ZONE 4 
PRINT 3,-4,5 
3 4 5 


Si noti che i numeri positivi sono stampati con uno spazio davanti mentre i numeri 
negativi sono preceduti da un segno meno. Tutti i numeri hanno dunque un carattere 
davanti (spazio o meno). Le stringhe vengono stampate esattamente come appaiono 
all’interno delle virgolette. 
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La funzione SPC prende come parametro una espressione numerica e stampa altrettanti 
spazi. Se il numero è negativo, si assume zero. Se è più grande dell’ampiezza del canale 
(finestra), si assume l’ampiezza dello schermo. 


PRINT SPC(5)”salve” 
salve 


x=3 
PRINT SPC(x*3)"salve” 
salve 


TAB si comporta in modo molto simile ma stampa tanti spazi quanti ne occorrono per 
arrivare ad una determinata colonna. 


Il canale in cui apparirà tutto ciò che viene stampato è la finestra 0, a meno che si sia 
incluso uno specificatore di canale prima degli oggetti da stampare. Per inviare dati ad 
un’altra finestra possono essere usati altri canali. I canali 8 e 9 sono casi speciali: il canale 
8 è collegato ad una eventuale stampante: Il canale 9 è collegato al disco o alla cassetta. 


Tuttavia, per questi due canali dovrebbe essere usato il comando WRITE al posto di 
PRINT. 


PRINT “ciao” 

ciao - finestra 0 

PRINT #0,”ciao” 

ciao - sempre nella finestra 0 

PRINT #4,”ciao” 

ciao - finestra 4 (in cima allo schermo) 
PRINT #8,”ciao” 

ciao - su un’eventuale stampante 


TAB e SPC sono comodi per formattazioni di stampa semplici; ma per formati più 
complicati può essere utilizzato il comando PRINT USING con una maschera del 
formato di stampa che si intende utilizzare. Una maschera è una stringa contenente 
caratteri speciali ognuno dei quali indica un particolare formato. Questi caratteri, 
chiamati “specificatori del formato del campo” si possono trovare nella descrizione 
dettagliata del comando PRINT USING, già presentato. I seguenti esempi dovrebbero 
però chiarirne il funzionamento. 


Ecco i formati disponibili per la stampa delle stringhe: 
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PRINT USING “\ \”;"stringa di prova” 
string 
“I” stampa il primo carattere della stringa. 


PRINT USING “!”;”stringa di prova” 
SÌ 


[N 


... ma probabilmente il carattere più utile è “&”. Questo carattere può essere usato per 
evitare la caratteristica di a capo automatico del BASIC. Normalmente il BASIC stampa 
una stringa a capo se non vi è sufficiente spazio per contenerla nella linea corrente. 
PRINT USING “&” evita questo comportamento. 


Si usi BORDER O per evidenziare i bordi della finestra. 


MODE 1:LOCATE 39,1:PRINT “troppo lungo” 
- linea 1 
troppo lungo - linea 2 


MODE 1:LOCATE 39,1:PRINT USING “&”;"troppo lungo” 


tr - linea 1 
oppo lungo - linea 2 


Per la stampa di numeri sono disponibili molte maschere. Probabilmente la più semplice 
è PRINT USING “#####” in cui viene stampata una cifra per ogni “#” che appare nella 
maschera. 


PRINT USING “######°;123 
123 


“ 


Può essere incluso il punto decimale (all’inglese) usando “. 


PRINT USING “####.#####";12.45 
. 12.45000 


Le cifre prima del punto decimale possono essere raggruppate tre a tre separate da una 
virgola se nella maschera viene inclusa una virgola (all’inglese) prima del punto 
decimale. 


PRINT USING “########,.####";123456.78 
123,456.7800 
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E’ inoltre possibile inserire un simbolo di Dollaro o di Lira Sterlina che verrà stampato 
davanti alla prima cifra del numero, anche se questo non riempie tutta la maschera. Per 
fare ciò si usano i simboli “$$” e “££”. 


PRINT USING “$$##°,7 
$7 


PRINT USING ‘“$$##";351 
$351 


PRINT USING “££####,.##°;1234.567 
£1,234.57 


Si noti che il risultato è stato arrotondato. 


Tiaiet 1] 


Lo spazio prima del risultato può essere riempito da asterischi usando ‘ nella 


maschera. 


PRINT USING “**####.#";12.22 
FERKI 22 


Anche i questo caso è possibile inserire un simbolo monetario (anche nella maschera sarà 
sufficiente specificare un solo simbolo) come in “**$...” e “**£...”. 


Un “+” all’inizio della maschera fa stampare sempre il segno prima del numero. Un “+” 
dopo la maschera fa stampare un segno finale. 


Il “” può essere posto solo alla fine della maschera e fa stampare un segno meno finale 
se il numero è negativo. 


PRINT USING “+##”;12 
+12 


PRINT USING “+##*;-12 
-12 


PRINT USING “##+”;12 
12+ 


PRINT USING “##-";-12 
12- 


PRINT USING “##-*;12 
12 
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Un “TTTT” stampa un numero in forma esponenziale. 


PRINT_USING “###.##TTTT”;123.45 
12.35E+01 


Usando le maschere per i numeri, si noti che se il numero è troppo lungo, prima del 
risultato verrà stampato un % mentre il risultato non viene abbreviato per stare nello 
spazio specificato. 


PRINT USING “####°;123456 
Y%123456 


Parliamo delle finestre. 


Il BASIC del 6128 permette di utilizzare fino a otto finestre per il testo. Ogni comando 
per i testi può essere quindi inviato ad una qualunque di queste finestre. 


Il comando usato per posizionare le finestre è WINDOW. Questo è seguito da 5 
parametri. Il primo è opzionale e indica la finestra che deve essere definita (se viene 
omesso, si assume la finestra 0). Il numero della finestra è preceduto dal simbolo di 
cancelletto. Gli altri 4 numeri indicano i limiti sinistro, destro, superiore ed inferiore della 
finestra. Questi valori corrispondono a righe e colonne. Le colonne possono andare da 1 
a 80, le righe da 1 a 25. 


L’esempio seguente definisce la finestra 4 in modo che inizi alla colonna 7 e finisca alla 
colonna 31, inizi alla riga 6 e finisca alla riga 18. Si reinizializzi il computer e si scriva: 


WINDOW #4,7,31,6,18 
Dopo questo comando nulla cambierà sullo schermo; ma si immettano le linee seguenti: 


INK 3,9 
PAPER #4,3 
CLS #4 


Questo farà sì che appaia sullo schermo un largo rettangolo verde, questa è la finestra 
numero 4. Il comando precedente evidenzia anche il fatto che sia PAPER che CLS 
possono essere usati con una qualunque delle otto finestre includendo il numero di canale; 
se questo viene omeso il comando gererà con la finestra 0, quella cioè per difetto. 
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Ognuno dei seguenti comandi può contenere un indicatore di canale che indica la finestra 
su cui deve operare: 


CLS 
COPYCHR$ 
INPUT 
LINE INPUT 
LIST 
LOCATE 
PAPER 
PEN 

POS 
PRINT 
TAG 
TAGOFF 
VPOS 
WINDOW 
WRITE 


La finestra verde che si trova in mezzo allo schermo avrà cancellato parte del testo 
precedente (posto sulla finestra 0). 


E’ possibile inviare un testo a qualunque finestra, indicando un canale in un comando 


PRINT: 
PRINT #4,"salve gente” 


Queste parole appariranno nell’angolo in alto a sinistra della finestra verde, diversamente 
dalle parole stampate da questo comando: 


PRINT “salve gente” 


Se si è inserito quest’ultimo comando, si noterà che parte della finestra verde è stata 
coperta dal testo. 


Se si vuole che i messaggi del BASIC appaiano sulla finestra 4, si può utilizzare il 
comando WINDOW SWAP: 


WINDOW SWAP 0,4 


Il “Ready” che seguirà questo comando sarà stampato sulla finestra verde ed il cursore 
si troverà proprio sotto la scritta. Si provi ora a scrivere: 


PRINT #4,"”ciao gente” 
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Le parole “ciao gente” appariranno nella vecchia finestra 0 che è stata scambiata con la 
finestra 4. Anche le informazioni relative alla posizione del cursore nelle finestre sono 
state scambiate, perciò anche dopo un WINDOW SWAP i messaggi verranno stampati 
sotto gli ultimi invece che all’inizio della finestra. Si provi: 


LOCATE #4,20,1 
PRINT “questa è la finestra 0” 
PRINT #4,”questa è la finestra 4" 


Il messaggio “finestra 0” si troverà sulla linea dopo il PRINT; il messaggio “finestra 4” 
si troverà nella parte centrale della linea superiore dello schermo. 


Prima di eseguire un comando WINDOW tutte le otto finestre coprono l’intero schermo. 
Ciò accade anche dopo l’esecuzione del comando MODE; se dunque il cursore si viene 
a trovare in una finestra molto piccola è sufficiente scrivere MODE 1 come nell’esempio 
seguente: 


MODE 1 

WINDOW 20,21,7,18 
MO 

DE 

1 


Non ci si preoccupi anche se la parola MODE è spezzata; se si sarà lasciato il necessario 
spazio tra MODE e 1, il comando funzionerà. 


Ora che si conosce qualcosa di più sull’utilizzo delle finestre, si immetta il seguente 
programma: 


10 MODE 0 

20 FOR n=0 TO 7 

30 WINDOW #n,n+1,n+6,n+1,n+6 
40 PAPER #n,n+4 

50 CLS #n 

60 FOR c=1 TO 200: NEXT c 

70 NEXT n 


Questo programma fissa 8 finestre che si sovrappongono ognuna di un diverso colore. Al 


termine del programma, quando apparirà la parola “Ready” si prema [RETURN] alcune 
volte per vedere il movimento dei blocchi sullo schermo, nonostante questo, le effettive 
posizioni delle finestre non cambiano. Si provi ora: 


CLS #4 
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... © si noterà che la finestra 4 è sempre nella stessa posizione. Si osservi ora cosa accade 
eseguendo: 


LIST 
LIST #4 
LIST #3 


Un'altra caratteristica del comando WINDOW,  esemplificata in un programma alla fine 
del capitolo è che non importa se si specificano i margini destro e sinistro in ordine 
inverso. Se il valore del primo parametro è maggiore del secondo, il BASIC scambierà 
i due valori. Lo stesso vale per i bordi superiore ed inferiore. 


10 MODE 0 
20 a=1+RND*19:b=1+RND*19 


30 c=1+RND*24:d=1+RND*24 
40 e=RND*15 


50 WINDOW a,b,c,d 
60 PAPER e:CLS 
70 GOTO 20 


Se posso interrompere ... 


Forse si sarà già notato che una delle innovazioni più importanti nel software del 
CPC6128 è costituito dalla possibilità di gestire gli interrupt da BASIC; questo significa 
che il BASIC riesce ad eseguire simultaneamente ed indipendentemente un certo numero 


di operazioni all’interno di un programma. Tale possibilità è nota con il nome di multi- 
tasking ed è implementata dai due comandi AFTER ed EVERY. 


PIPE 


suono mediante code e rendez-vous. 


Ogni aspetto della sincronizzazione si riferisce all’orologio principale del sistema che è 
un sistema di sincronizzazione al quarzo contenuto nel computer principale che si occupa 
del tempo e della sincronizzazione degli eventi che avvengono nel computer - operazioni 
come la scansione dello schermo ed il clock del processore. Quando una funzione 
dell’hardware è connessa al tempo, può essere seguita utilizzando l’orologio principale 
al quarzo. 


L’implementazione software è costituita dai comandi AFTER e EVERY che, secondo 
l’approccio rivolto verso l’utente del BASIC AMSTRAD, fanno esattamente ciò che 
dicono: ad esempio AFTER (DOPO) il momento indicato nella linea di comando, il 
programma deve eseguire una determinata sub-routine ed eseguire le operazioni indicate. 
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Il CPC utilizza un orologio in tempo reale. Il comando AFTER permette di eseguire da 
BASIC delle sub-routine in un dato momento del futuro. Sono disponibili quattro timer 
di ritardo ognuno dei quali ha associata una sub-routine. 


Quando il tempo specificato è trascorso, la sub-routine viene automaticamente chiamata, 
proprio come se fosse stato eseguito un GOSUB nella posizione corrente del programma. 
Quando la sub-routine termina, mediante un normale comando RETURN, il programma 
continua la propria esecuzione da dove era stato interrotto. 


Il comando EVERY permette di chiamare delle sub-routine da BASIC ad intervalli 
regolari. Sono disponibili quattro timer di ritardo ognuno dei quali ha associata una sub- 
routine. 


I timer hanno diverse priorità di interruzione. Il timer 3 ha la proprietà più alta ed il timer 
0 quella più bassa. 


10 MODE 1:n=14:x=RND*400 


20 AFTER x,3:GOSUB 80 

30 EVERY 25,2 GOSUB 160 

40 EVERY 10,1 GOSUB 170 

50 PRINT “Controlla i tuoi riflessi” 

60 PRINT “premi la barra spaziatrice”; 

70 IF flag=1 THEN END ELSE 70 

80 z=REMAIN(2) 

90 IF INKEY$(47)=-1 THEN 110 

100 SOUND 1,900:PRINT “baro!”:GOTO 150 
110 SOUND 129,20:PRINT “ORA!”:t=TIME 
120 IF INKEY$(47)=-1 THEN 120 

130 PRINT “ci hai messo”; 

140 PRINT (TIME-1)/300;”secondi” 

150 CLEAR INPUT ':flag=1:RETURN 

160 SOUND 1,0,50:PRINT “.”;:RETURN 
170 n=n+1:1IF n>26 THEN n=14 

180 INK 1,n:RETURN 


I comandi AFTER e EVERY possono essere eseguiti in qualunque momento, reinizia- 
lizzando la routine ed il tempo di ritardo associato ad un dato timer. I timer di ritardo sono 
gli stessi sia per il comando AFTER che per il comando EVERY, e quindi un AFTER 
sostituisce ogni EVERY che utilizza un determinato timer e viceversa. 


I comandi DI ed El dibabilitano o abilitano i timer e gli interrupt per il suono mentre i 
comandi all’interno di essi vengono eseguiti. Questo ha l’effetto di ritardare l’interrupt 
di proprietà più alta del timer 1 da tutto ciò che potrebbe accadere durante la gestione 
dell’interrupt da parte del timer con priorità più bassa.La funzione REMAIN disabilita e 
restituisce il tempo mancante per uno dei quattro timer. 
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Uso dei DATA ... 


In un programma che usa sempre lo stesso gruppo di informazioni che devono essere 
inserite all’inizio, potrebbe essere utile usare un meccanismo che eviti di chiedere ogni 
volta all’utente le stesse informazioni. Questa possibilità è offerta dai comandi READ e 
DATA. READ, che significa LEGGI, assegna valori alle variabili. Diversamente da 
INPUT prende valori dalle linee DATA. I due esempi seguenti ne mostrano il funzio- 
namento. 


10 INPUT “inserire 3 numeri separati da virgole”;a,b,c 
20 PRINT “i numeri sono”;a;”e”;b;”e”;c 
run 


10 READ a,b,c 

20 PRINT “i numeri sono”;a;”e”;b;”e”;c 
30 DATA 12,14,21 

run 


Anche nelle linee DATA i diversi elementi sono separati da virgole. 


In una linea DATA è possibile inserire anche stringhe: 


10 DIM a$(11) 

20 FOR i=0 TO 11 

30 READ af$(i) 

40 NEXT 

50 FOR i=0 TO 11 

60 PRINT af (i) ;” “; 

70 NEXT 

80 DATA tanto,va,la,gatta,al,lardo,che,ci,lascia,lo,zampino 
run 


Anche se la linea DATA contiene stringhe, queste non devono essere racchiuse tra doppi 
apici “”’; in effetti in questo caso il loro uso è opzionale come pure lo è inserendo una 
stringa in risposta ad un INPUT. E” utile usare i doppi apici nel caso in cui una stringa 
contiene una virgola. Infatti, se non vi fossero i doppi apici, la virgola verrebbe 


interpretata come un delimitatore. 
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10 READ a$ 
20 WHILE a$<>”*” 


30 PRINT a$ 

40 READ a$ 

50 WEND 

60 DATA La vecchia, desolata, malconcia casa scricchiolava al vento 
70 DATA “L’uomo alto, magro, scuro tossi’ violentemente” 

80 DATA * 


run 


La stringa della linea 60 contiene delle virgole e dunque ogni parte verrà letta e stampata 
separatamente. La stringa alla linea 70 è delimitata dai doppi apici e verrà stampata per 
intero. 


L’esempio qui sopra mostra che le linee di dati possono trovarsi su più linee. READ 
leggerà le linee in ordine (60,70,80,ecc). Un altro fatto non altrettanto ovvio è che le linee 
DATA possono trovarsi in qualunque punto del programma, prima o dopo il READ che 
le legge. 


Se un programma contiene più READ, il secondo inizierà a leggere dove il primo ha 
finito: 


10DATA 123,456,789,321,654,2343 

20 FOR i=1 TO 5 

30 READ num 

40 totale=totale+num 

50 NEXT 

60 READ totale2 

70 IF totale=totale2 THEN PRINT “i dati sono ok” ELSE PRINT “errore nei dati” 
run 


Si provi ad editare la linea 10, si modifichi uno dei primi 5 numeri e si esegua nuovamente 
il programma. Questa tecnica consiste nell’aggiungere al termine della riga, un numero 
che sia la somma degli altri. In questo modo è facile trovare eventuali errori, specie se vi 
sono molte linee DATA. 


Se in un programma vi sono DATA misti (stringhe e numeri) non vi è alcun problema; 
occorre però che i dati vengano letti correttamente secondo il tipo. Ad esempio, se una 
linea DATA contiene nell’ordine due numeri ed una stringa, è necessario leggere prima 
i due numeri e poi la stringa: 
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10 DIM a(5 ),b(5),s5$(5) 

20 FOR i=1 TO 5 

30 READ a(i),b(i),s$(i) 

40 NEXT 

50 DATA 1,7,marco,3,9,davide,2,2,luca,4,6,paol0,9,1,alfonso 
60 FOR i=1 TO 5 

70 PRINT s$(i),":”; ali)*b(i) 


80 NEXT 
Se invece si vogliono separare i diversi tipi di dati: 


10 DIM a(5 ),b(5),s$(5) 

20 FOR i=1 TO 5 

30 READ a(i),b(i) 

40 NEXT 

50 FOR i=1 TO 5 

60 READ s$(i) 

70 NEXT 

80 DATA 1,7,3,9,2,2,4,6,9,1 

90 DATA marco,davide,luca,paolo,alfonso 
100 FOR i=1 TO A 


110 PRINT ”” a(i)*bli 
120 NEXT Sao) 


Se si cambia la linea 20 in: 
20 FOR i=1 T0 4 


... i primi due tentativi di leggere una stringa alla linea 60 leggeranno “9” e “1”. Anche 
se questi valori possono essere considerati delle stringhe, il risultato non è quello che ci 
si doveva attendere. Per fare in modo che il programma funzioni correttamente, si 
possono includere i due comandi seguenti: 


15 RESTORE 80 
45 RESTORE 90 


Il comando RESTORE porta il puntatore che indica il dato che deve essere letto da un 
READ alla linea specificata. E’ possibile inserirlo in un’istruzione condizionale per 
leggere un certo blocco di DATA a seconda del verificarsi di certe condizioni. Ad 
esempio, in un gioco a più livelli che si sviluppa su più schermi, i DATA relativi ad ogni 
schermo possono essere prelevati considerando il valore di una certa variabile, ad 
esempio “livello”. Segue un esempio di questo tipo. 
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1000 REM disegno dello schermo 

1010 IF livello=1 THEN RESTORE 2010 
1020 IF livello=2 THEN RESTORE 2510 
1030 IF livello=3 THEN RESTORE 3010 
1040 FOR y=1 TO 25 

1050 FOR x=1 to 40 

1060 READ carattere 

1070 LOCATE x,y:PRINT CHR$(carattere); 
1080 NEXT x,y 


2000 REM Dati schermo 1 
2010 DATA 200,190,244,244,210,...ecc 


2500 REM Dati schermo 2 
2510 DATA 100,103,245,243,251,...eCC 


3000 REM Dati schermo 3 
3010 DATA 190,191,192,193,194,...ecc 


Ecco un altro esempio di uso di DATA, READ e RESTORE per suonare un motivo. I 
periodi vengono letti da istruzioni READ all’interno di linee DATA; RESTORE fa 
ripetere il motivo. 


10 FOR i=1 T03 

20 RESTORE 100 

30 READ note 

40 WHILE nota<>-1 

50 SOUND 1,nota,35 

60 READ nota 

70 WEND 

80 NEXT 

90 SOUND 1,142,100 

100 DATA 95,95,142,127,119,106 

110 DATA 95,95,119,95,95,119,95 
120 DATA 95,142,119,142,179,119 
130 DATA 142,142,106,119,127,-1 

run 
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Il sound della musica ... 


Di tutte le possibilità offerte dal CPC6128, i comandi relativi al suono e agli inviluppi 
potranno sembrare i più ostici, ma non è necessariamente così. Con un po’ di pratica sarà 
possibile ottenere vari rumori e perfino far suonare alla macchina un brano completo. 


Guardiamo innanzitutto le prime 4 parti del comando SOUND. Queste sono: il numero 
del canale, il periodo del tono,la durata della nota e il volume. Ora occorre sapere che 
valori possono assumere tali parametri. 


Lasciamo per il momento perdere il primo parametro (numero del canale) che è piuttosto 
complicato. La seconda parte (periodo del tono) può essere un qualunque valore intero 
compreso tra 0 e 4095, ma solo alcuni dei valori compresi tra questi estremi producono 
una nota musicale riconoscibile. Si veda la Parte 5 del Capitolo "Riferimenti". Ad 
esempio il numero 239 suonerà il Do centrale mentre il numero 253 suona un Si appena 
al di sotto del Do centrale. I valori da 240 a 252 eseguono una scala che però non 
corrisponde ad una scala del piano. Se il periodo del tono è 0, non viene emesso alcun 
suono - tornerà utile quando si parlerà dei rumori. 


La terza parte delcomando SOUND fornisce la durata della nota in centesimi di secondo. 
Questo valore può essere compreso tra 1 e 32767. Tuttavia, se il valore è 0, la lunghezza 
della nota verrà determinata dall’inviluppo usato (si vedrà questo più avanti). Se il valore 
è negativo, indica quante volte l’inviluppo deve essere suonato (perciò -3 indica di 
ripetere l’inviluppo del volume 3 volte, anche questo verrà spiegato più avanti). 


La quarta parte del comando è il volume. Questo può andare da 0 a 15 (se viene omesso 
si assumerà 12). In tutti gli esempi che si sono visti finora, il volume rimaneva costante 
per tutta la durata della nota. Usando un inviluppo del volume, la parte relativa al volume 
del comando SOUND viene considerata il valore iniziale della nota. 


Parliamo ora del numero del canale. Questo è un numero che assume significato bit a bit 
e sarà dunque necessario conoscere qualcosa sui numeri binari per comprendere appieno 
l’argomento; si veda dunque la parte 1 di questo Capitolo. 


Un suono può essere emesso da uno qualunque dei tre generatori; se il computer è 
collegato ad un amplificatore stereo, un canale si troverà a sinistra, uno a destra ed il terzo 
in centro (sia a destra che a sinistra). Per scegliere il canale che dovrà emettere la nota si 
usano i seguenti tre numeri: 


1 canale A 
2 canale B 
3 canale C 
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Per suonare con più di un canale, occorre sommare i numeri dei canali desiderati. Ad 
esempio, per suonare sui canali A e C si usa 1+4=5. 


SOUND 5,284 


Potrebbe sembrare strano che al canale C sia stato dato il numero 4 invece del numero 3. 
Ciò avviene perchè ognuno di questi numeri è una potenza di 2 (1=2/0, 2=2/1, 4=2A2) 
e perciò è possibile combinarli per formare un numero binario. Se si pensa a tre numeri 
binari, ognuno dei tre numeri può assumere i valori 0 o 1 ed in questo modo si indica se 
un dato canale deve essere attivo o no. Dall’esempio appena visto: 


5 in decimale è l'equivalente di 1*4+0*2+1*1 o 101 in binario. Se ad ogni cifra del 
numero binario associamo un canale, avremo: 


CBA 
101 


In altri termini, il canale C è attivo, il B no e l’A è attivo. Se si pensa di emettere la nota 
dai canali A e B, bisogna quindi utilizzare il numero 


CBA 
011 


Il numero binario 011 corrisponde a 0*4+1*2+1*1=3. Il comando avrebbe perciò 
dovuto essere: 


SOUND 3,142 


Questo è naturalmente lo stesso numero che si sarebbe ottenuto sommando i valori dei 
canali interessati (si ricordi A=1, B=2, C=4). Per suonare con i canali A e B, il numero 
da utilizzare è dunque 1+2=3. 


Se non si è compreso a fondo questo argomento, non ci si preocupi. E’ sufficiente sapere 
che per far suonare più canali bisogna sommare i valori corrispondenti a ciascun canale. 


Sfortunatamente vi sono anche altri valori che entrano a far parte del numero di canale. 
Inumeri 8, 16 e 32 indicano che il suono deve effettuare un rendezvous con un altro canale 
(rispettivamente A, B e C). Ci si starà probabilmente chiedendo in che senso si parla di 
rendezvous. Fino ad ora i suoni prodotti andavano direttamente ad un dato canale. Si provi 
ora: 


SOUND 1,142,2000 
SOUND 1,90,200 
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Se non si sarà stati molto lenti ad immettere il secondo comando, ci si sarà accorti che si 
è potuto inserire quest’ultimo prima che il precedente finisse di suonare. Ciò avviene 
perchè il sistema di generazione sonora può memorizzare fino a 5 comandi sonori in una 
coda. Se desideriamo emettere un suono dal canale A e poi due suoni simultaneamente 
dai canali A e B, occorrerà trovare un modo per far conoscere al computer che la seconda 
nota non dovrebbe iniziare prima che sia finito il primo suono del canale A; un canale 
dovrà attendere l’altro. Questa operazione è nota con il nome di rendezvous e vi sono due 
modi per utilizzarlo: 


SOUND 1,200,1000 
SOUND 3,90,200 


In questo caso la seconda nota è diretta ad A e B e dunque non può iniziare prima che 
finisca la prima nota sul canale A. La limitazione imposta da questo comportamento (una 
combinazione di note deve attendere che tutti i canali su cui opera siano liberi) è che ad 
entrambi i canali viene inviato lo stesso suono (in questo caso ,90,200 è stato suonato 
sia da A che da B). Il metodo alternativo consiste in: 


SOUND 1,200,2000 
SOUND 1+16,90,200 
SOUND 2+8,140,400 


In questo caso la seconda nota sul canale A è posta in rendezvous con il canale B ed il 
canale B è posto in rendezvous con il canale A. Il vantaggio è ovvio: anche se la seconda 
nota emessa da A è diversa dalla nota emessa da B, esse sono collegate tra di loro in modo 
che non possano iniziare se entrambi i canali non sono liberi - questo è il rendezvous. 
Anche in questo caso il valore deve essere letto bit a bit: 


8=2/3, 16=2/4, 32=245 


... Il numero di canale può dunque essere visto come un numero binario in cui le cifre 
hanno i seguenti significati: 


rendezvous rendezvous rendezvous suono suono suono 
C B A C B A 
+32 +16 +8 +4 +2 +1 


Per far emettere una nota da C in rendezvous con A, si usa dunque: 
(0) 0 1 1 0 0 
.. in binario 1100, uguale a 8+4=12 


Perciò un numero di canale uguale a 12 chiede al computer di emettere una nota dal canale 
C ed attendere una nota con cui vi è un rendezvous sul canale A. 
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Se si aggiunge al numero di canale il numero 64 (276), significa che la nota deve essere 
trattenuta. In pratica significa che la nota non deve essere emessa fino all’esecuzione del 
comando RELEASE. 


Infine, utilizzando 128 (277) la coda del canale specificato viene gettata via. Perciò, se 
si inizia un suono che sta durando troppo su un determinato canale, un modo rapido per 
fermarlo è: 


SOUND 1,248,30000 (è un suono che dura 5 minuti) 
SOUND 1+128,0 (pone termine al suono) 


In modo diretto, vi è un modo più rapido di terminare un lungo suono: consiste nel 
premere all’inizio della linea il tasto [DEL]; il breve bip elimina tutte le code dei canali. 


Ora che possiamo inviare un qualunque suono ad uno qualunque dei tre canali (con 
eventuali rendezvous), sarebbe bello poter produrre un suono più melodioso del puro e 
semplice bip. Per fare ciò si utilizzano gli inviluppi che definiscono il modo in cui la nota 
deve suonare più o meno forte nella sua durata. Una nota prodotta da uno strumento ha 
un momento di attacco, in cui il volume cresce molto rapidamente. Il volume scende poi 
ad un determinato livello che viene mantenuto per un certo tempo, passato il quale il 
suono cala lentamente verso lo zero. Alle note prodotte con SOUND è possibile fornire 
un inviluppo di questo tipo. Per fare ciò si usa la parola chiave ENV. Vediamo un semplice 
esempio: 


ENV 1,5,3,4,5,-3,8 
SOUND 1,142,0,0,1 


Il comando ENV deve venire prima del comando SOUND su cui opera. Per usare questo 
inviluppo in un comando SOUND, il numero dell’inviluppo deve essere aggiunto come 
quinto parametro - in questo caso 1). Il primo numero di un comando ENV è il numero 
dell’inviluppo che si intende definire. L’istruzione ENV indica poi la durata della nota 
e le sue caratteristiche di volume, e dunque i parametri relativi alla durata ed al volume 
del comando SOUND sono a zero. L’inviluppo definito or ora fa crescere il suono in 5 
passi in ognuno dei quali il suono aumenta di 3 unità ed in cui ogni passo dura 4 centesimi 
di secondo. Il volume viene poi ridotto in 5 passi, in ognuno dei quali il volume cala di 
3 unità ed in cui ogni passo dura 8 centesimi di secondo. In altre parole il primo numero 
indica l’inviluppo che si intende definire; questo numero è seguito da due gruppi di tre 
numeri. In ognuno dei due gruppi il primo numero indica in quanti passi il volume deve 
salire o scendere, il secondo indica di quante unità il volume deve aumentare o calare ad 
ogni passo ed il terzo indica la durata di ogni passo. 


Capitolo 9 Pagina 38 A vostra disposizione 


La durata totale di ognuna delle due parti è uguale al primo valore (numero dei passi) 
moltiplicato per il terzo (durata dei passi). La crescita o decrescita totale del volume è 
uguale al numero dei passi per le unità di volume che vengono aggiunte o tolte ad ogni 
passo. La durata media di un inviluppo con più di una parte è uguale alla somma delle 
durate delle sue parti. 


Naturalmente il volume iniziale non deve necessariamente essere uguale a 0 (come nel 
comando SOUND). L’esempio precedente presentava una nota in cui il volume prima 
saliva e poi scendeva. L’esempio seguente presenta una nota che prima cala e poi cresce: 


ENV 2,5,-2,1,20,0,1,10,1,1 
SOUND 1,248,0,15,2 


Questo inviluppo diventa il numero 2 ed è formato da tre parti. Nella prima il volume 
viene ridotto di due unità ogni 5 passi della durata di 1 centesimo di secondo. La seconda 
parte consiste di 20 passi di un centesimo di secondo ma con nessun incremento o 
riduzione del volume (volume costante). La terza parte è formata da 10 passi di 1 
centesimo di secondo l’uno in cui il suono aumenta di 1 unità per passo. 


Il comando SOUND ha un volume iniziale di 15 e dunque dopo la prima parte verrà 
ridotto a 5 dove rimane costante per 20 centesimi di secondo ed alla fine viene riportato 
a 15 nella parte finale del’inviluppo. 


E’ piuttosto difficile visualizzare la forma di questo inviluppo ma può aiutare disegnarlo 


prima su carta e determinare quindi i parametri che devono essere passati al comando 
ENV. Le figure successive mostrano la forma dei due inviluppi prodotti finora: 


Unità di volume 


#00 
NUM. PASSI 5 ! NUM. PASSI 5 SECONDO 
LUN. PASSI 3 LUN. PASSI -3 
PAUSA 4 PAUSA 4 
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Unità di volume 


1_ 2 3 4 5 6 7 8 910 t1 12 13 14 15 6 17 18 19 2021 22 23 24 25 26 27 28 203031 32 33 3435 1 


SECONDO 


NUM, PASSI 20 i 
LUN: PASS | LUN. PASSI0 
PAUSA PAUSA1 ] 


Un inviluppo può essere composto da un massimo di 5 parti, ognuna delle quali è formata 
da 3 valori, e dunque il comando ENV può contenere fino a 16 parametri (compreso il 
primo che indica l’inviluppo utilizzato - 1..15). Se il volume dovesse superare il 15 o 
andare sotto lo 0, il passo successivo al 15 verrà assunto 0 ed il passo sotto lo 0 diventerà 
il 15: 


ENV 3,9,5,20 
SOUND 1,142,0,0,3 


Questo semplice inviluppo produce 9 passi della durata di 20 centesimi di secondo in 
ognuno dei quali il volume aumenta di 5 unità. Dopo i primi 3 passi, il volume sarà uguale 
a 15 e i passi successivi lo porteranno a 4,9 e così via, Il diagramma seguente ne mostra 
gli effetti: 
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Unità di volume 


NUM. PASSI 9 
LUN. PASSI 5 
PAUSA 20 


Il numero dei passi può andare da 0 a 127. La variazione del volume dei passi può andare 
da -128 a 127 (i valori negativi fanno calare il volume) e la durata dei passi può andare 
da 0 a 255. 


Ora che possiamo creare un inviluppo del volume che definisce la “forma” del suono, 
potremmo voler modificare il tono per produrre effetti di “vibrato” in cui la nota varia 
intorno alla frequenza principale. 


Questo controllo viene effettuato da un comando molto simile a quello di controllo del 
volume. Gli inviluppi dei toni vengono prodotti usando il comando ENT. Ad esempio: 


ENT 1,5,1,1,5,-1,1 
SOUND 1,142,10,15,,1 


Si utilizza l’inviluppo del tono nel comando SOUND inserendolo come sesto parametro 
del comando SOUND. Anche in questo caso il comando ENT deve precedere il comando 


SOUND. 
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Il primo esempio di ENT specifica che nell’inviluppo di tono numero 1 vi devono essere 
5 passi in ognuno dei quali il periodo aumenta di 1; ogni passo dura 1 centesimo di 
secondo. La seconda parte dell’inviluppo specifica altri 5 passi in cui il periodo del tono 
cala di 1 unità (-1) ed in cui ogni passo dura 1 centesimo di secondo. La lunghezza totale 
è dunque di 5+5=10 centesimi di secondo. Si noti che la durata della nota deve essere 
specificata nel comando SOUND poiché l’inviluppo del tono non specifica la durata 
della nota (contrariamente all’inviluppo del volume). Se la lunghezza specificata nel 
comando SOUND è più corta della durata dell’inviluppo del tono, l’ultima parte 
dell’inviluppo verrà persa. Se è maggiore, l’ultima parte della nota continuerà ad un 
livello costante. Ciò avviene anche se per determinare la lunghezza della nota si usa 
l’inviluppo del volume. 


Si noti nell’esempio sopra l’assenza di un riferimento ad un inviluppo del volume. Ciò 
avviene poiché non abbiamo creato un inviluppo del volume per questo suono. 


La maggior parte degli inviluppi dei toni sarà probabilmente più corta della lunghezza 
della nota. Per questo motivo è possibile far ripetere l’inviluppo del tono per tutta la durata 
della nota. Si può fare ciò specificando un inviluppo negativo il cui corrispondente valore 
positivo viene usato dal comando SOUND: 


ENT -5,4,1,1,4,-1,1 
SOUND 1,142,100,12,,5 


Questo inviluppo produrrà un effetto di vibrato nella nota. Quando si definisce un 
inviluppo per i toni, è conveniente farlo variare simmetricamente rispetto al periodo 
iniziale del tono in modo che, quando viene ripetuta, la nota non si allontanerà troppo dal 
suo valore iniziale. Si provi: 


ENT -6,3,1,1 
SOUND 1,142,90,12,,6 


Si noterà che questo suono cala molto rapidamente in frequenza in quanto ogni volta che 


l’inviluppo viene ripetuto il periodo cresce di 3 unità e ciò avviene 30 volte (90/3). Questo 
effetto può tornare utile in suoni come fischi e sirene: 


ENT -7,20,1,1,20,-1,1 
SOUND 1,100,400,12,,7 


ENT -8,60,-1,1,60,1,1 
SOUND 1,100,480,12,,8 


E° possibile definire contemporaneamente fino a 15 inviluppi del tono (da 1 a 15); come 
si è detto un numero negativo indica che l’inviluppo deve essere ripetuto. Il numero di 
passi (il primo valore in ogni gruppo di 3) può andare da 0 a 239. Come nell’inviluppo 
del volume, le dimensioni di ogni passo possono andare da -128 a 127 ed il tempo di pausa 


può andare da 0 a 255. Anche il comando ENT come il comando ENV può contenere un 
massimo di 5 parti ognuna contenente 3 valori. 
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L’ultima parte che può essere inserita nel comando SOUND è il settimo parametro che 
indica il livello del rumore che deve essere sommato al suono. Bisogna ricordare che vi 
è un solo generatore di rumore e quindi ogni periodo del rumore elimina il precedente. 


Aggiungendo un rumore ad una nota le si dà un suono differente; è anche possibile usare 
il rumore da solo indicando un periodo del tono (secondo parametro del comando 
SOUND) uguale a 0 che significa la presenza del solo rumore. Ciò può essere utilizzato 
per suoni percussivi. Si provi: 


ENT -3,2,1,1,2,-1,1 
ENV 9,15,1,1,15,-1,1 
FOR a=1 TO 10:SOUND 1,4000,0,0,9,3,15:NEXT 


Questa potrebbe essere la base del rumore di un treno. Per fare ciò vengono utilizzati 
entrambi gli inviluppi ed il rumore. 


Le parti relative alla durata ed al volume del comando SOUND sono entrambe a 0 in 
quanto tali valori vengono determinati dall’inviluppo del volume. 


Ora che abbiamo imparato ad usare tutti gli aspetti dei comandi SOUND, ENV ed ENT, 
possiamo esaminare altri comandi e funzioni ad essi associati. 


Quando abbiamo descritto il numero di canale nel comando sound, aggiungendo 64 ad 
esso, il suono veniva trattenuto e quindi rimaneva in coda finché non fosse stato rilasciato. 
L’operazione di rilascio del suono viene effettuata dal comando RELEASE. Tale parola 
è seguita da un numero che ha significato bit a bit in cui ogni bit indica quale canale 
occorre rilasciare. Ancora una volta occorre comprendere che: 


4 significa canale C 
2 significa canale B 
1 significa canale A 


... ed è possibile rilasciare più canali sommando tra di loro questi numeri. Per rilasciare 
dei suoni trattenuti in tutti e tre i canali, si usa: 


RELEASE 7 


... dove 7=1+2+4. Se nessun canale è trattenuto, il comando RELEASE viene ignorato. 
Si provi ora: 


SOUND 1+64,90 

SOUND 2+64,140 

SOUND 4+64,215 

RELEASE 3:FOR t=1 TO 1000:NEXT:RELEASE 4 
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I suoni che ci si attenderà dai tre comandi SOUND non verranno emessi finché non viene 
eseguito il primo RELEASE che permette di eseguire i suoni dei canali A e B. Dopo un 
certo ritardo verrà rilasciato anche il suono del canale C. 


Vi è un altro modo in cui più suoni possono incontrarsi in un rendezvous. Quando viene 
aggiunto alla coda un suono con il bit di trattenimento (con sommato il numero 64), non 
verrà trattenuto solo quel suono, ma anche tutti quelli che verranno successivamente 
inviati alla coda. Se vengono inviati altri 4 suoni, la macchina si fermerà finché non 
verranno rilasciati i suoni, eventualmente con una subroutine chiamata dopo un periodo 
di tempo fissato (usando AFTER o EVERY). Tuttavia questo non è un buon metodo per 
usare il sistema sonoro in quanto il programma contenente i comandi SOUND può 
fermarsi di tanto in tanto nel momento in cui la coda si riempie. Ciò può avvenire anche 
se vengono accodati in rapida successione molti suoni di lunga durata. Si provi: 


10 FORa=1 TO 8 
20 SOUND 1,100*a,200 


30 NEXT 
40 PRINT “ciao” 
run 


Si noterà che la parola “ciao” non appare istantaneamente ma dopo i primi tre suoni. Ciò 
avviene in quanto il programma non può continuare finché non si libera uno spazio nella 
coda. 


Il BASIC contiene un meccanismo di interruzioni (interrupt) simile a quello usato nei 
comandi AFTER ed EVERY ed in ON BREAK GOSUB. Ciò permette di specificare 
una routine relativa al suono che viene richiamata solo quando vi è spazio libero nella 
coda. Si provi: 


10 a=0 

20 ON SQ(1) GOSUB 1000 

30 PRINT a; 

40 GOTO 30 

1000 a=a+10 

1010 SOUND 1,a,200 

1020 IF a<200 THEN ON SQ(1) GOSUB 1000 
1030 RETURN 

run 


Si noti che il programma non si ferma mai. Il comando SOUND viene chiamato solo 
quando la coda del canale A (il numero 1) ha uno spazio libero. Questa condizione viene 
controllata da ON SQ(1) GOSUB alla linea 20. Il comando inizializza un meccanismo 
di interrupt che richiama la sub-routine di generazione sonora nonappena si libera uno 
spazio nella coda specificata. Dopo essere stato usato, ON SQ GOSUB deve essere 
reinizializzato e questa operazione viene effettuata dalla linea 1020 della sub-routine. In 
questo esempio la sub-routine si reinizializza se il valore di a è minore di 200. 
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In un programma completo che può spostare oggetti sullo schermo o fare somme e così 
via, è possibile avere una musica di sottofondo richiamando la sub-routine solo quando 
vi è uno spazio libero nella coda. In questo modo il programma non si fermerà in attesa 
che si liberi uno spazio della coda. Se i valori delle none vengono presi da delle linee 


DATA, si può fare in modo che la sub-routine venga rieseguita nonappena i dati sono 
finiti. 


Il numero all’interno delle parentesi di ON SQ( ) GOSUB può essere 1,2 0 4, a seconda 
del canale che viene controllato. 


Per leggere lo stato di un qualunque canale dall’interno di un programma, si può usare la 
funzione SQ(). Il numero all’interno delle parentesi può anche in questo caso essere 1,2 
o 4 a seconda del canale a cui si è interessati, Questa funzione restituisce un valore che 
deve essere letto bit a bit e per decifrarlo occorre conoscere i numeri binari. I bit del valore 
restituito hanno il seguente significato: 


BIT DECIMALE SIGNIFICATO 

0,1,2 1,2,4 Numero di posizioni libere nella coda 

3 8 La nota in cima alla coda effettua un rendezvous con A 
4 16 La nota in cima alla coda effettua un rendezvous con B 
5 32 La nota in cima alla coda effettua un rendezvous con C 
6 64 La nota in cima (ed anche la coda) è trattenuta 

7 128 Una nota è in esecuzione 


Si provi quest’esempio: 


10 SOUND 2,200 
20 x=SQ(2) 

30 PRINT BIN$(x) 
run 


Verrà stampato il numero binario 10000100, in cui il bit 7 è uguale a 1 (il canale sta 
emettendo una nota al momento dell’esecuzione di SQ( )). Le ultime tre cifre (100) 
convertite in decimale danno il valore 4 e quindi vi sono 4 posti liberi nella coda. Questa 
funzione può essere utilizzata per controllare lo stato di una coda in un determinato punto 
del programma diversamente da ON SQ( ) GOSUB che effettua un controllo e 
risponderà allo stato della coda in un punto indeterminato del programma. 


Fino ad ora tutti gli esempi riguardavano solo una o due note. E’ possibile emettere un 
intero gruppo di note distinte per ottenere un brano musicale, elencando le note in 
istruzioni DATA; queste verranno poi lette da istruzioni READ e suonate da istruzioni 


SOUND. 
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10 FORottava=-1 TO 2 

20 FOR x=1 TO 7:REM 7 note per ottava 
30 READ nota 

40 SOUND 1,nota/2Tottava 

50 NEXT 

60 RESTORE 

70 NEXT 

80 DATA 426,379,358,319,284,253,239 
run 


L’ultimo esempio sviluppa ulteriormente questo principio. Le note ed i ritmi vengono 
suonati dai canali A e B, usando i rendezvous per sincronizzarsi. L’esempio dimostra uno 
dei modi in cui è possibile formattare istruzioni DATA per includere 
note,ottave,lunghezze ed informazioni sui redezvous: 


10 REM la linea 180 contiene i suoni alti 

20 REM la linea 190 contiene i suoni bassi 

30 DIM scala%(12):FOR x%=1 TO 12: READ scala%(x%):NEXT 

40 can1%=1:READ can1$:can2%=1:READ can2$ 

50 CLS 

60 spd%=12 

70 scala$=" a-b b c+c d-e e f+f g+g” 

80 ENV 1,2,5,2,8,-1,10,10,0,15 

90 ENV 2,2,7,2,12,-1,10,10,0,15 

100 ENT -1,1,1,1,2,-1,1,1,1,1 

110 DEF FNM$(s$,s)=MID$(s$,5,1) 

120 can1%=1:GOSUB 200 

130 can2%=1:GOSUB 380 

140 IF cant1%+can2%>0 THEN 140 

150 END 

160 DATA &777,&70c,&6a7,&647,&5ed,&598 

170 DATA &547,&4fc,&4b4,&470,&431,&3f4 

180DATA 4cr4f4f1f191A1-B2C2f4g92g91A1-B6A2Crifigifigla1-b1A1- 
b2C292A292f191a292f6e2c2e2c2 
g2e2c1-B1A2g92f4e4d8c4f3f1c2d4-b2fr2-B2A2g92f6e2gr4C4- 
B1a1f1-b192c2-b4a4g94fr6A2A2-B4-B2Ar2-B2A292f6e294C4- 
B1A1f1-B192C2-B4A4g8f. 

190DATA r4f4f8f4e4c4fr8f4e2f2e4d2e2d8c8c6e2f4g4g98e4f3f 
1c4dr8g4cr4e4c6f2d4c4c8fr8-e4dr8g 
8c4e4c6f2d4c4c8f. 

200 REM invia il suono al canale A 

210 pi1$=FNM$(can1$,can1%) 

220 IF p1$<>”r” THEN r1%=0:GOTO 240 

230 r1%=16:can1%=can1%+1:p1$=FNM$(can1$,can1%) 


continua nella prossima pagina 
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240 IF p1$=”." THEN can1%=0:RETURN ELSE 11%=VAL(p1$) 
250 can1%=can1%+1 

260 n1$=FNM(can1$,can1%) 

270 can1%=can1%+1 

280 IF n1$="+” OR n1$="-” THEN 350 

290 n1$=” “+n1$ 

300 nd1%=(1+INSTR(scala$,LOWER$(n1$)))/2 

310 IF ASC(RIGHT$(n1$,1))>96 THEN 01%=8 ELSE 01%=16 
320 SOUND 1+r1%,scala%(nd1%)/01%,spd%(11%,0,1,1 

330 ON SQ(1) GOSUB 200 

340 RETURN 

350 n1$=n1$+FNM(can1$,can1%) 

360 can1%=can1%+1 

370 GOTO 300 

380 REM invia il suono al canale B 

390 p2$=FNM$(can2$,can2%) 

400 IF p2$<>”r” THEN r2%=0:GOTO 420 

410 r2%=8:can2%=can2%+1:p2$=FNM$(can2$,can2%) 

420 IF p2$=”.” THEN can2%=0:RETURN ELSE 12%=VAL(p2$) 
430 can2%=can2%+1 

440 n2$=FNM(can2$,can2%) 

450 can2%=can2%+1 

460 IF n2$="+” OR n2$="-” THEN 530 

470 n2$=” “+n2$ 

480 nd2%=(1+INSTR(scala$,LOWER$(n2$)))/2 

490 IF ASC(RIGHT$(n2$,1))>96 THEN 02%=4 ELSE 02%=8 
500 SOUND 2+r2%,scala%(nd2%)/02%,spd%*12%,0,2 


510 ON SQ(2) GOSUB 380 

520 RETURN 

530 n2$=n2$+FNM(can2$,can2%) 
540 can2%=can2%+1 

550 GOTO 480 

run 


Parliamo di grafica 


Questa parte descrive le possibilità grafiche del CPC6128. Il primo esempio verrà 
ampliato per mostrare di volta in volta le varie operazioni possibili. 


Per iniziare divideremo lo schermo in una finestra di testo (linea 40) e una finestra grafica 
(linea 30), fissando il MODE ed una coppia di colori lampeggianti (linea 20): 
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10 REM programma grafico 

20 MODE 1:INK 2,10,4:INK 3,4,10 
30 ORIGIN 440,100,440,640,100,300 
40 WINDOW 1,26,1,25 

50 CLG 2 


Eseguendo questo programma apparirà un quadrato lampeggiante nella parte centrale del 
lato destro dello schermo. Questo quadrato ha colore 2 (magenta azzurro lampeggianti) 
fornitogli alla linea 50 e l’origine delle coordinate è stata portata nell’angolo inferiore 
sinistro del quadrato. Il comando MODE ha portato il cursore grafico all’origine delle 
coordinate (X=0,Y=0) ed in tal modo possiamo disegnare una riga diagonale sullo 
schermo con la linea 60: 


60 DRAW 200,200,3 
Si esegua il programma modificato e si veda il risultato. Ora si aggiunga: 
80 MOVE 0,2:FILL 3 


La linea 80 porta il cursore grafico all’interno del quadrato e lo riempie con il colore 3. 
I limiti del riempimento coincidono con i bordi della finestra grafica (in questo caso 
coincidono con i bordi del quadrato) e tutto ciò che è stato disegnato con il colore della 
penna (3) o con l’inchiostro usato da FILL (anch’esso 3). 


Ora si esegua nuovamente il programma. 


Per vedere più chiaramente il comportamento di FILL ai bordi, si aggiunga la linea 70. 
Si noti che è solo il fatto che lo riempimento viene effettuato con lo stesso colore della 
linea diagonale che restringe il riempimento a metà del quadrato. 


70 GRAPHICS PEN 1 
run 


Si editi ora la linea 80 per effettuare un FILL con il colore 1 poi si esegua nuovamente 
il programma per dimostrare quest’ultimo punto. Si ritorni poi a FILL 3. 


Ora si aggiungano le linee da 100 a 140 che disegnano un quadrato: 


100 MOVE 20,20 
110 DRAW 180,20 
120 DRAW 180,180 
130 DRAW 20,180 
140 DRAW 20,20 
run 
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Il riquadro viene disegnato con il colore 1 a causa della linea 70. Eliminando la linea 70 
avremmo dovuto aggiungere “,1” come terzo parametro del comando MOVE della linea 
100 o come terzo parametro della linea 110 per chiedere al computer di cambiare penna. 


Uniamo i punti ... 


Le linee non devono necessariamente essere continue, possono essere tratteggiate. Il 
comando MASK permette di specificare le dimensioni dei punti. La maschera verrà 
ripetuta ogni 8 pixel ed ogni linea successiva utilizzerà lo stesso schema. Un nuovo 
comando MASK (con lo stesso parametro di quello attualmente in uso) farà ritornare ai 
normali $ pixel. 


La maschera di punti è in effetti costituita da un numero binario di un solo byte dove i bit 
a 1 indicano i punti in cui utilizzare la penna. Nel nostro esempio useremo una costante 
binaria (indicata da &X) che chiede di colorare 4 pixel al centro degli 8 pixel con i due 
più esterni non colorati. Perciò si aggiunga: 


90 MASK &X00111100 
run 


Ma un momento! Questo programma negli angoli non funziona come ci si aspetterebbe. 
Il motivo risiede nel fatto che i punti negli angoli vengono in effetti stampati due volte: 
una come ultimo pixel di una linea ed un’altra come primo pixel della linea successiva. 
Un modo poco elegante per aggirare questo problema è: 


115 MOVE 180,22 
125 MOVE 178,180 
135 MOVE 20,178 
run 


... che produce l’effetto desiderato. Vi è tuttavia un modo più semplice che consiste 
nell’aggiungere un secondo parametro (,0) alla fine del comando MASK il quale chiede 
di non disegnare il primo punto di ogni linea. Si editi la linea 90 e si scriva tale parametro: 


90 MASK &X00111100,0 


... e si cancellino le linee aggiunte inserendo: 


115 
125 
135 
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Ora si riesegua il programma e questa volta il riquadro tratteggiato sarà simmetrico. Si 


noti che se il secondo parametro di MASK è 1 il comando torna a disegnare tutte le linee 
a partire dal primo pixel. 


Si guardi ora tra i tratteggi delle linee. Vi è qualcosa nel triangolo in basso a destra che 
non si trova nel triangolo in alto a sinistra. Questa è la carta della grafica che è stata posta 
uguale al colore 2 con il comando CLG 2 della linea 50 e che è invisibile nel triangolo 
in alto a sinistra perchè è dello stesso colore dello sfondo. Si modifichi ora la linea 50: 


50 CLG 2:GRAPHICS PAPER 0 


... e si riesegua il programma. La carta viene ora mostrata in modo chiaro in tutto il 
riquadro. 


E° possibile rendere invisibile (o trasparente) la carta della grafica. Ciò significa che una 
linea tratteggiata disegnata su un'immagine preesistente manterrà ciò che si trova tra i 
punti. Il cursore grafico diventa cioè trasparente aggiungendo un “,1” al comando 
GRAPHICS PEN. Ritornerà non trasparente utilizzando il parametro “,0”. Si modifichi 
la linea 70: 


70 GRAPHICS PEN 1,1 
run 


... @ si osservi il risultato. 


Oltre a disegnare linee è possibile scrivere testi alla posizione del cursore grafico. In 
questo modo è possibile posizionare i caratteri con una precisione molto superiore (a passi 
di 1 pixel invece di 8) e che possiamo disegnare caratteri utilizzando i colori grafici (si 
veda più avanti). 


Per scrivere caratteri alla posizione del cursore grafico, si porti il cursore grafico 
nell’angolo in alto a sinistra del primo carattere che deve essere stampato e poi si esegua 
il comando TAG (0 TAG #1 ecc. per altri canali di testo) seguito da un normale comando 
PRINT. Il cursore grafico verrà spostato di 8 caratteri a destra per ogni carattere che viene 
stampato. Si aggiunga: 


160 MOVE 64,108 
170 TAG 

180 PRINT “MARCO” 
190 TAGOFF 

run 


Ogni messaggio di output di BASIC verrà inviato allo schermo di testo qualunque sia la 


modalità utilizzata (TAG/TAGOFF) ma è conveniente uscire dalla modalità TAG 
quando non se ne ha più bisogno. 
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Ma cosa sono quelle frecce dopo il nome? Bene, questi sono i caratteri di ritorno carrello 
CHRS$(13) e di a capo CHR$(10). Il software di gestione della grafica trasforma tutti i 
primi 32 caratteri ASCII nelle corrispondenti versioni stampabili (come se fossero 


preceduti da un CHR$(1)). Ciò avviene perchè la maggior parte dei primi 32 caratteri ha 
un particolare significato solo per lo schermo di testo. Per lo stesso motivo, se si supera 
la larghezza dello schermo non viene effettuato alcun A capo automatico. 


I caratteri di ritorno carrello e di a capo possono essere eliminati con la solita tecnica che 
consiste nel terminare la linea con un punto e virgola: 


180 PRINT “MARCO”; 
run 


Il testo inviato allo schermo grafico usando TAG subisce l’influenza dei comandi 
GRAPHICS PEN utilizzati per il tracciamento di linee. Perciò il nome viene scritto con 
il colore 1 (a causa di GRAPHICS PEN 1) ed è trasparente. Il comando: 


150 GRAPHICS PEN 1,0 
run 


... tornerà ad usare la carta opaca, mentre: 


150 GRAPHICS PEN 0,1 
... Scriverà con il colore 0, in modo trasparente. 


Si cancelli ora la linea 150 e si esegua nuovamente il programma. La penna grafica 
ritornerà del colore 1 in modo trasparente (fissati alla linea 70). 


Caratteri trasparenti 


E’ anche possibile aggiungere caratteri trasparenti allo schermo di testo usando un 
determinato codice di controllo. Si aggiunga: 


200 PRINT #2,CHR$(22);CHR$(1) 

210 LOCATE #2,32,14:PRINT #2,”****** 
220 LOCATE #2,32,14:PRINT #2,”- - - - - - i 
230 PRINT #2,CHR$(22);CHR$(0) 

run 


La linea 200 pone il canale #2 in modo trasparente. Si noti che i caratteri di sottolineatura 
appaiono insieme agli asterischi. In questo modo è possibile costruire caratteri composti, 
anche in più colori. La linea 230 esce dal modo trasparente e riporta il canale #2 al modo 
opaco. 


A vostra disposizione Capitolo 9 Pagina 51 


Colori e modalità 


E°’ possibile disegnare usando una modalità che permette di mescolare il colore del 
disegno a quello che è già presente sullo schermo. Il colore finale viene calcolato 
effettuando una combinazione logica tra il colore che è presente sullo schermo e il colore 
(della penna o della carta) con cui si disegna. Le combinazioni logiche disponibili sono 
XOR, AND e OR. Questa modalità può essere specificata o come quarto parametro di 
DRAW/DRAWR, PLOT/PLOTR, MOVE/MOVER o “stampando” con PRINT la 
sequenza CHR$(23);CHR$(<modalità>). In entrambi i casi il valore 1 sta per XOR, 2 
per AND e 3 per OR. Il valore 0 ripristina la normale modalità in cui il colore del disegno 
sostituisce quello già presente sullo schermo. 


Il prossimo esempio mostra l’uso della combinazione XOR. Tale combinazione è molto 
usata nella grafica della tartaruga in quanto ripassando due volte la stessa immagine, essa 
viene riportata ai colori originali. Perciò si esegue due volte la routine di disegno del 
riquadro (linee 110 e 130) e due volte si esegue anche la stampa in testo e grafica TAG 
alle linee 170 e 190. I comandi FRAME permettono di aggiungere un ritardo che rende 
visibile l’effetto. Si noti l’uso, nella linea 90, dei comandi senza parametro iniziale. Ciò 
è perfettamente normale e lascia ai primi parametri i valori precedenti. 


Il terzo parametro (,1) del comando MOVE alla linea 220 chiede di usare il colore 1 per 
la penna grafica, modificando il valore 3 chiesto alla linea 60. La modalità XOR viene 
scelta utilizzando il quarto parametro del comando DRAWR alla linea 230. Si noti che 
anche qui si è tralasciato un parametro. 


Un particolare effetto può essere visualizzato eliminando il comando MASK della linea 
90. Gli angoli del quadrato spariscono in quanto vengono disegnati due volte (alla fine 
di una linea ed all’inizio della successiva) e quindi vengono cancellati per effetto della 
modalità XOR. 


10 REM modalità XOR 

20 MODE 1:INK 2,10:INK 3,4 
30 ORIGIN 440,100,440,640,100,300 
40 WINDOW 1,26,1,25 

50 CLG 2:GRAPHICS PAPER 0 
60 DRAW 200,200,3 

70 MOVE 2,0:FILL 3 

80 ORIGIN 440,0,440,640,0,400 
90 GRAPHICS PEN ,1:MASK ,0 
100 FOR y=60 to 318 STEP 2 
110 GOSUB 220 

120 FRAME:FRAME 

130 GOSUB 220 


continua nella prossima pagina 
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140 NEXT 
150TAG 

160 FOR y=60 to 318 STEP 2 

170 MOVE 96,y:PRINT CHR$(224); 
180 FRAME:FRAME 

190 MOVE 96,y:PRINT CHR$(224); 
200 NEXT 

210 END 

220 MOVE 90,y,1 

230 DRAWA 20,0,,1 

240 DRAWA 0,20 

250 DRAWA -20,0 

260 DRAWR 0,-20 

270 RETURN 

run 


Animazione 


E’ possibile produrre un effetto di animazione cambiando i colori associati agli inchiostri. 
Anche se il contenuto della memoria rimarrà uguale, sullo schermo apparirà un movimen- 
to. Un esempio è contenuto nel programma “Welcome” nel lato 4 dei dischi di sistema 
(si immetta RUN “disc” per vedere il programma dimostrativo). Lo scambio dei colori 
non è tuttavia sufficiente se le figure si sovrappongono. Il prossimo esempio usa la 
modalità OR per stampare sullo schermo i numeri da 1 a 4. La forma viene determinata 
esaminando il carattere stampato nell’angolo in fondo a sinistra e riproducendo ogni 
punto con grossi blocchi grafici. Inumeri vengono scritti uno ad uno usando i colori 1,2,4 
e 8 in modalità OR fissata in questo caso da una sequenza di caratteri di controllo alla linea 


50. 


Le linee da 160 in poi scambiano i colori secondo una formula matematica. I colori 
vengono determinati controllando un colore per volta e cercando la componente binaria 
che stiamo cercando. Ad esempio il numero 3 verrà disegnato con il colore 4 e quindi per 
visualizzare il numero 3 dobbiamo allocare un colore visibile a tutti gli inchiostri in cui 
il numero contiene il numero binario 4. Questi inchiostri sono: 


4(0100), 5(0101), 6(0110), 7(0111), 12(1100), 13(1101), 14(1110), 15(1111) 


In un’applicazione pratica, gli inchiostri che dovranno essere cambiati dovrebbero essere 
calcolati, e le linee da 180 a 200 dovrebbero essere sostituite da una routine più veloce. 
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10 REM animazioni 


20 ON BREAK GOSUB 220 

30 FOR i=1 TO 15:INK i,26:NEXT 

40 m(1)=1:m(2)=2:m(3)=4:m(4)=8 

50 MODE 0:PRINT CHR$(23);CHR$(3);:TAG 
60 FOR p=1 TO 4 

70 GRAPHICS PEN m(p),1 

80 LOCATE #1,1,25:PRINT #1,CHR$(48+p); 
90 FOR x=0 TO 7 

100 FOR y=0 TO 14 STEP 2 

110 IF TEST(x*4,y)=0 THEN 140 


120 MOVE (x+6)*32,(y+6)*16:PRINT CHR$(143); 
130 MOVE (x+6)*32,(y+7)*16:PRINT CHR$(143); 


140 NEXT y,x,p 

150 LOCATE #1,1,25:PRINT#1,” “; 

160 FOR p=1 TO 4 

170 FOR i=1 TO 25:FRAME:NEXT 

180 FOR i=0 TO 15 

190 IF (i AND m(p))=0 THEN INK i,0 ELSE INK i,26 
200 NEXT i,p 

210 GOTO 160 

220 INK 1,26 

run 


Sprite a piani di colore 


Nell’esempio precedente abbiamo visto come, avendo disegnato grafici con i colori 1, 2, 
4 e 8 può essere generato un effetto di animazione modificando i colori. Se vengono usati 
gli stessi inchiostri ma i colori vengono fissati su valori diversi, si può produrre un effetto 
completamente diverso conosciuto come “piani di colore”: 


10 montagne 

20 DEFINT a-z 

30 INK 0,1:INK 1,26 

40 INK 2,6:INK 3,6 

50 FOR i=4 TO 7:INK i,9:NEXT 

60 FOR i=8 to 15:INKi,20:NEXT 

70 MODE 0:DEG:ORIGIN 0,150:CLG:MOVE 0,150 
80 FOR x=16 TO 640 STEP 16 


continua nella prossima pagina 
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90 DRAW x,COS(x)*150+RND*100,4 


100 NEXT 

110 MOVE 0,0:FILL 4 

120 cx=175:GOSUB 320 

130 cx=525:GOSUB 320 

140 SYMBOL 252,0,0,&C,&1F,&30,&7F,&FF 

150 SYMBOL 253,0,6,&E,&F2,2,&F2,&FE 

160 SYMBOL 254,0,&60,&70,&7F,&7F,&7F,&7F 

170 SYMBOL 255,0,0,0,&F8,&EC,&FE,&FF 

180 pr$=CHR$(254)+CHR$(255) 

190 pl$=CHR$(252)+CHR$(253) 

200 TAG:t!=TIME 

210 FOR x=-32 TO 640 STEP 4 

220 x2=((608-x)*2)MOD 640:hl=RND*10:hr=50*SIN(x) 
230 GRAPHICS PEN 8,1:MOVE x,100+hr,,3:PRINT pr$; 
240 GRAPHICS PEN 2,1:MOVE x2,115+hl,,3:PRINT pl$; 
250 IF (TEST(x2-2,115+hl-12) AND 8)=8 THEN 380 

260 IF TIME-t1<30 THEN 260 

270 FRAMEtt!=TIME 

280 GRAPHICS PEN 7,1:MOVE x,100+hr,,2:PRINT pr$; 
290 GRAPHICS PEN 13,1:MOVE x2,115+hl,,2:PRINT pl$; 
300 NEXT 

310 GOTO 210 

320 MOVE cx,100 

330 FOR x=0 TO 360 STEP 10 

340 DRAW cx+SIN(x)*50+10*RND,100+COS(x)*25+10*RND,1 


350 NEXT 

360 DRAW cx,100:MOVE cx,90:FILL 1 

370 RETURN 

380 ENT -1,1,1,1 

390 SOUND 1,25,400,15,,1,15 

400 FOR y=100+hr TO -132 STEP -2 

410 GRAPHICS PEN 7,1:MOVE x,y,,2:PRINT pr$; 
420 GRAPHICS PEN 8,1:MOVE x,y-2,,3:PRINT pl$; 
430 NEXT 

440 GOTO 70 

run 


Per spiegare come funziona questo programma, dobbiamo visualizzare il colore INK in 
binario. Partendo dal valore più alto (15), tutti i colori INK che possiedono l’ottavo bit (da 
15 a 8) sono posti nel colore azzurro. Tutti i colori INK che possiedono il quarto bit (da 
7 a4) sono posti a verde. I colori INK 2 e 3 che possiedono il bit 2 sono posti a rosso. Infine 
il colore 1 è posto a bianco. INK 0 rimane blu. 
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Sullo schermo i grafici subiscono un OR sul posto - linee 230 e 240. Il colore di ogni pixel 
viene determinato dal bit più significativo del risultato in quel punto. Per questo motivo, 
un'immagine sul piano più significativo oscurerà sempre un'immagine su un piano meno 
significativo ma lo sfondo rimane e può essere visualizzato nuovamente se l’immagine 
“più significativa” viene spostata. Il modo in cui è possibile spostare un’immagine 
consiste nel disegnarla usando la modalità AND con i colori numero 7,11,13 o 14 
eliminando i precedenti colori 8,4,2,1 rispettivamente - linee 280 e 290. 


Grafica ed uso della memoria aggiuntiva 


Per concludere questo capitolo presentiamo un programma di disegno grafico che utilizza 
i 64K aggiuntivi di RAM del CPC6128. 


109 ‘SCREEN DESIGNER by DAVID RADISIC 

209 ' copyright (c) AMSOFT 1985 

30! 

40 ‘Remember to RUN "BANKMAN" before running program! 

50 AITTTETLEEEIETELIEZZFZTIZIZZ TZ ZI ZZZ IZIZIZZIZZZZIZAZZZA TA A I 

60! 

70 ON ERROR GOTO 2740 

809 DEFINT a-x 

99 MODE 1:ch=127:cmnd=1:pn(0)=d:pn(1)=26:pn(2)=15:pn(3) 
=6:pn(4)=0:pn=1:norx=1:menu=1:2zz=HIMEM 

199 DIM command$(22) 

119 norx$(8)="Normal":norx$(1)="X0R ":norx$(2)="Trans 
p":norx$(3)="XOR si 

129 RESTORE:READ cmnds$(1),cmnds$(2):cmnd$=CHR$(16)+CHR 
$(&7F)+cmnds$(1)+cmnds$(2) 

139 READ cmno:FOR i=1 TO cmno:READ command$(i):NEXT 

149 READ st$:IF st$<>"**" THEN cmnd$C(cmnd)=st$:cmnd=cmn 
d+1:G0T0 140 

150 WINDOW #09,1,40,1,3:PAPER #0,0:PEN #0,1:CLS #0 

169 WINDOW #1,1,40,4,4:PAPER #1,3:PEN #1,1:CLS #1 

170 ORIGIN 9,09,09,6409,9,334 

189 x=320:y=200:MOVE x,y 

199 BORDER pn(4):FOR i=0? TO 3:INK i,pnC(i):NEXT 

2009 MASK 255,0:PAPER D:PEN 1:PAPER #1,3:PEN #1,1:GRAPHI 
CS PEN pn,norx 

210 IF flag<>5 THEN 280 


continua sulla prossima pagina 
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220 


230 
240 


250 
260 


270 
280 


290 
300 
310 
320 
330 
340 
350 
360 
370 
380 


390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 


If pn<2 THEN pnt$=CHR$(240):px=(pn+1)*13 ELSE IF pn 
<4 THEN pnt$=CHR$(241):px=(pn-1)*13 ELSE pnt$=CHR$( 
243) :px=37 

LOCATE px,2:PRINT pnt$; 

LOCATE 1,1:PRINT USING" PEN 0 : ## PEN 1: ##"; 
pn(d);pn(1); 

LOCATE 29,2:PRINT USING"Border : ##";pn(4) 


LOCATE 1,3:PRINT USING" PEN 2 : ## PEN 3: ##"; 
pn(2);pn(3); 

LOCATE px,2:PRINT "_ "; 

LOCATE #1,1,1:PRINT#1,USING"X :#### Y :#### Le 


x;y;:PRINT #1, "Plot mode : ";norx$(norx+(undraw*2)) 


IF flag=0 THEN GOSUB 2260 
' 

GOSUB 970 

' 


IF flag>09 THEN 390 

IF i$="" THEN 390 
cmnd=INSTR(cmnd$,1$):IF cmnd=0 THEN 390 
IF cmnd=1 THEN CLG:x=320:y=299:G0T0 390 
IF cmnd=2 THEN RUN 70 

ON cmnd-2 GOSUB 12409,1410,15209,1649,1849,18609,1950, 
2020,2090,2120,2170,22009,2669,2660,2660,2660,2390,2 
330,2200 

IF tx=0 AND ty=9 THEN 200 

IF flag>9 THEN 440 

GOSUB 630 

GOSUB 6809:FRAME:GOSUB 680 

GOTO 200 

MOVE tempx,tempy,pn,1 

ON flag GOSUB 470,490,550,640 

GOTO 200 

PLOT x,y:GOSUB 630:PLOT x,y 

RETURN 

DRAW tempx+x,tempy:DRAW tempx+x,tempy+ty 
DRAW tempx,tempy+y:DRAW tempx,tempy 
GOSUB 630 

DRAW tempx+x,tempy:DRAW tempx+x,tempy+ty 
DRAW tempx,tempy+ty:DRAW tempx,tempy 
RETURN 

MOVE tempx,tempy:DRAWR x,y 

IF triside=0 THEN 580 

DRAW tempxx,tempyy:DRAW tempx,tempy 


continua sulla prossima pagina 
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910 
920 
930 
940 
950 
960 
970 
980 
990 


GOSUB 630 

MOVE tempx,tempy:DRAW tempx+tx,tempy+ty 

IF triside=0 THEN RETURN 

DRAW tempxx,tempyy:DRAW tempx,tempy 

RETURN 

x=xttx:y=y+ty:RETURN 

MOVE tempx,tempy:DRAW x,y 

GOSUB 630 

MOVE tempx,tempy:DRAW x,y 

RETURN 

' draw and undraw cursor 

IF flag=5 THEN RETURN 

MASK 255,1 

IF flag>1 THEN xx=tempx+x:yy=tempy+y ELSE xx=x:yy=y 
IF flag=4 THEN xx=x:yy=y 

IF flag=1 THEN xx=x:yy=y 

IF undraw=1 THEN 829 

GOSUB 790 

MASK 255,0 

IF i$=" " THEN GOSUB 2150:i$="" 

RETURN 

MOVE xx-4,yy,pn,1:DRAW xx+4&,yy 

MOVE xx,yy-4:DRAW xx,yyt54 

MOVE xx,yy,,xorn:RETURN 

nx=1:GOSUB 1220 

FRAME:GOSUB 1220 

IF i$=" " THEN nx=norx:GRAPHICS PEN pn,1:GO0OSUB 1220 
Leni 

IF flag<>6 THEN 760 

IF moved=0 AND j$<>"" AND (j$<CHR$(248) OR j$>CHR$( 
247)) THEN ch=ASC(j$):moved=1 

IF moved=0 THEN RETURN 

LOCATE 5,2 

FOR i=ch-5 TO ch+5 

PEN ABS(Ci<>ch)+1 
ch$=CHR$(1)+CHR$CABS(i+256)MOD 256) 

IF ch=i THEN PRINT" "ch$" "; ELSE PRINT ch$; 
NEXT 

PEN 1:PRINT" = "ch" "; 

GOTO 760 

ty=0:tx=09:GOSUB 689:FRAME:GOSUB 680 

IF INKEY(0)<>-1 OR INKEY(72)<>-1 THEN ty=16 
IF INKEY(2)<>-1 OR INKEY(73)<>-1 THEN ty=-16 


1900 IF INKEY(8)<>-1 OR INKEY(74)<>-1 THEN tx=-16 


continua sulla prossima pagina 
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IF INKEY(1)<>-1 OR INKEY(75)<>-1 THEN tx=16 

IF INKEY(21)<>-1 OR INKEY(76)<>-1 THEN tx=tx/8:ty= 
ty/8 

IF tx=9 AND ty=0 THEN moved=M? ELSE moved=1 
j$=INKEY$:i1$=UPPER$(j$) 

IF (i$=" " OR i$=CHR$(13)) AND flag>0 THEN 1090 

IF flag=5 THEN 1120 

IF flag=6 THEN 1170 

RETURN 

ON flag GOSUB 1240,1419,16409,1860,1950,2020 

j$="" 

RETURN 

IF moved=0 THEN RETURN 

IF tx>2 THEN pn=(pn+1) MOD 5 ELSE IF tx<-2 THEN pn 
=ABS((pn<1))*5-1+pn 

IF ty>2 THEN pnC(pn)=(pn(pn)+1) MOD 27 ELSE IF ty<- 
2 THEN pn(pn)=ABS((pnC(pn)<1))*27-1+pn(pn) 

GRAPHICS PEN pn:PEN #1,pn 

tx=09:ty=9:BORDER pn(pn):RETURN 

IF tx<09 THEN ch=ABS(ch+255) MOD 256 

IF ty<9 THEN ch=ABS(ch+246) MOD 256 

IF tx>@ THEN ch=(ch+1) MOD 256 

IF ty>@9 THEN ch=(ch+109) MOD 256 

tx=0:ty=09:RETURN 

TAG:MOVE xx-8,yy+6,pn,nx:PRINT CHR$(ch);:TAGOFF 
RETURN 

1: G 

IF flag=1 THEN 1290 

ro=1:GOSUB 2240 

tempx=x:tempy=y:flag=1 

RETURN 

IF tempx=x AND tempy=y THEN 1390 

PLOT x,y,,1 
tix=MAX(x,tempx)-MIN(tempx,x):tiy=MAX(y,tempy)-MIN 
(tempy,y) 

ti=SQR((tix12)+(tiy12)) 

ORIGIN tempx,tempy 

PLOT 9,9,pn,0:MOVE d,-ti 

FOR z=0 TO PIx2+0.091 STEP PI/(ti/2) 

DRAW SIN(z+PI)*ti,COS(z+PI)*ti,pn,norx 


NEXT z 

ORIGIN 0,09 
x=tempx:y=tempy:tempx=0:tempy=0:flag=0 
RETURN 


continua sulla prossima pagina 
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1820 


' B 

IF flag=2 THEN 1470 

ro=2:GOSUB 2240 

tempx=x:tempy=y:flag=2 

x=0:y=0 

RETURN 

IF norx=1 THEN 1500 

MOVE tempx,tempy:DRAW tempx+x,tempy,,norx 
DRAW tempx+x,tempy+y:DRAW tempx,tempy+y:DRAW tempx 
,tempy 

x=tempx:y=tempy:flag=0 

RETURN 

'F 

ro=3:GOSUB 2240 

GOSUB 1620:IF i$=" " THEN 1600 
edgecol=VAL(i$) 

ro=4:GOSUB 2240 

GOSUB 16209:IF i$=" " THEN 1600 
filler=VALCi$) 

MOVE x,y,edgecol:FILL filler 
flag=0b:i$="" 

RETURN 

i$=INKEY$S:IF (i$<"0" OR i$>"3") AND i$<>" " THEN 1 
620 

RETURN 

tti 

IF flag=3 THEN 1700 

flag=3:ro0=5:GOSUB 2240 

tempx=x:tempy=y 

x=0:y=0 

RETURN 

IF triside<>0@ THEN 1770 

ro=6:GOSUB 2240 

MOVE 9,0,pn,1:GOSUB 590 
tempxx=tempx+tx:tempyy=tempy+y:x=x/2:y=20 
triside=1 

GOSUB 5509:GOSUB 590 

RETURN 

IF norx=1 THEN 1800 

MOVE tempxx,tempyy,,norx:DRAW tempx,tempy 
DRAW tempx+tx,tempy+y:DRAW tempxx,tempyy 
tempxx=0:tempyy=0 
x=tempx:y=tempy:triside=0 
tempx=d:tempy=0:flag=0 


continua sulla prossima pagina 
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1950 
1960 


1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 
2130 


2140 
2150 
2160 
2170 
2180 
2190 
2200 
2210 
2220 
2230 


RETURN 
‘a 
norx=1:undraw=undraw XOR 1:RETURN 
' 
L 
IF flag=4 THEN 1910 


ro=7:GOSUB 2240 

tempx=x:tempy=y:flag=4 

RETURN 

IF norx=1 THEN 1930 

MOVE tempx,tempy,,norx:DRAW x,y 
x=tempx:y=tempy:flag=0 

RETURN 

HT 

IF flag=5 THEN flag=0:CLS:INK 3,tmpcol:INK pn,col: 
GOTO 1990 

CLS:flag=5:BORDER pn(pn) 

RETURN 

FOR i=09 TO 3:INK i,pn(i):NEXT:BORDER pn(4) 
IF pn=4 THEN pn=1 

CLS:RETURN 

"UA 

IF flag=6 THEN 2070 

tempx=0:tempy=0:CLS 
undraw=1:flag=6:norx=1:moved=1 

RETURN 

flag=0 

RETURN 

'* N 

norx=0 

RETURN 

V.LE 

GRAPHICS PEN pn_f:TAG:MOVE xx-8,yyt6,,0:PRINT " "; 
:TAGOFF 

RETURN 

'<SPACE> 

PLOT x,y,pn,norx:RETURN 

"X 

norx=1 

RETURN 

'M 

menu=menu MOD 2+1 

GOSUB 2260:RETURN 

ig=UPPER$CINKEY$):IF i$="" OR INSTR(ser$,1$)=0 THE 
N 2230 ELSE RETURN 


continua sulla prossima pagina 
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2340 
2350 
2360 
2370 
2380 
2390 
2400 
24510 
2420 
2430 
24550 
2450 
24560 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 
2580 
2590 
2600 
2610 
2620 
2630 
2640 
2650 


CLS:undraw=@:PRINT cmnd$(ro);:LOCATE 1,3:PRINT"<SP 
ACE> ";:IF ro=3 OR ro=4 THEN PRINT"TO exit" 
RETURN 

CLS:flag=-1 

FOR i=1 TO LEN(cmnds$(menu)) 
ps=îi+ABS(menu=2)*LENC(cmnds$(1)) 

PEN 1:PRINT"<"MID$(cmnds$(menu),i,1)">"MID$(comman 
d$(ps),2,4)" "; 

NEXT 

PRINT"<CLR> <DEL> <SPACE>"; 

RETURN 

li 

GOSUB 2460:IF filename$="" THEN 2370 

GOSUB 2550 

SAVE filename$,b,&C000,&4000 

GOSUB 22609 

RETURN 

' R 

GOSUB 2460:IF filename$="" THEN 2440 

GOSUB 2730 

LOAD filename$,&C000 

GOSUB 2570 

GOSUB 2260 

RETURN 

CLS:LOCATE 19,3:PRINT"<RETURN> to Abort!"; 
LOCATE 1,1:PRINT"Enter Filename :"; 

INPUT "",filename$:IF filename$="" THEN RETURN 
n=INSTR(filename$,"."):IF n=0 THEN 2520 

IF n=1 THEN 2469 
filename$=LEFT$(filename$,n-1) 
filename$=LEFT$(filename$,8)+".scn" 

CLS 

RETURN 

FOR i=09 TO 4:POKE &COOA+i,pnCi):NEXT 

RETURN 

FOR i=09 TO 4:pn(i)=PEEK(&C000+i) MOD 27:NEXT 
cn=0:FOR i=0 TO 2:IF pn(i)=pn(i+1) THEN cn=cn+1 
NEXT:IF cn=3 THEN 2630 

FOR i=09 TO 3:INK i,pnCi):NEXT 

BORDER pn(4):pn=1:GRAPHICS PEN pn 

RETURN 
pn(0)=0:pn(1)=26:pn(2)=15:pn(3)=6:pn(4)=0 
GOTO 2600 

+ 1, 2, 3, & 4 


continua sulla prossima pagina 
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2669 CLS:PRINT"DOo you wish to <S>tore":PRINT TAB(16)"<R 
‘>etrieve":PRINT TAB(13)"or <E>xchange the screen 
n 
2670 ser$="SRE"+CHR$(13):GOSUB 2230:IF i$=CHR$(13) THEN 
2260 
26809 bnk2=(cmnd-13):bnk1=1 
2690 IF i$="S" THEN CLS:GOSUB 25509:ISCREENCOPY,bnk2,bnk 


1 
2700 IF i$="R" THEN GOSUB 27309:1SCREENCOPY,bnk1,bnk2:G0 
SUB 2570 


2710 IF i$="E" THEN CLS:GOSUB 2730:GOSUB 2550: ISCREENSW 
AP,bnk2,bnk1:GOSUB 2570 

27209 GOSUB 2260:RETURN 

2730 FOR i=0 TO 3:INK i_,0:NEXT:BORDER B:RETURN 

27409 CLS:GOSUB 2600:RESUME 2260 

2750 DATA "CBFTALIANEXM","1234RSM" 

2760 DATA 19,Circle,"Box ","Fill ",Triangle,Alternate, 
"Line ","Inks ",ASCII,Normal,Erase,"Xor ", "Menu " 
,"isto","2nd ","3rd ","4th ",Restore, "Save "," 
Menu " ì 

2770 DATA Circle,Box,Edge colour,Filler colour,Triangle 

1,Triangle 2,Line,** 


I due comandi RSX, |SCREENCOPY e |SCREENSWAP usati in questo programma 
vengono forniti dal programma di utilità “Bank Manager” sul lato 1 dei dischi di sistema. 
I comandi facilitano la copia e lo scambio dei vari schermi tra i vari blocchi di memoria 
e tra i due banchi da 64K. 


E° necessario perciò eseguire il programma “Bank Manager” PRIMA di eseguire questo 
programma e per fare ciò occorre inserire il lato 1 dei dischi forniti e scrivere: 


run “bankman” 


Poi si potrà eseguire il programma presentato. 


Ed ora cosa accade? 


Avendo eseguito il programma Bank Manager seguito dal programma Screen Designer 
presentato, apparirà un menù di opzioni ed un cursore grafico lampeggiante nel centro 
dello schermo. 
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Da ora in poi, si prema la lettera appropriata (ad esempio “C” per Circle) per eseguire la 
funzione desiderata. 


Come disostrazione, si prema: 
C 


... poi si prema il tasto cursore con la freccia verso l’alto per portare il cursore grafico a 
2 0 3 centimetri dal centro dello schermo. 


Infine si prema la barra spaziatrice per eseguire la funzione Circle che come si sarà 
immaginato disegna un cerchio. Si tornerà così al menù iniziale. 


Premendo M (per Menù) si passerà ad un altro menù da dove si può salvare (Save) o 
ripristinare (Restore) un determinato schermo e dove è possibile manipolare il contenuto 
degli schermi da 1 a 4 (contenuti nel secondo banco di 64K di memoria). 


Per usare queste funzioni, si deve immettere il “numero della memoria” (1, 2,3 0 4) ed 
in tal modo verrà visualizzato un altro menù. 


Da qui si può selezionare: 


Ss Per memorizzare uno schermo 
R Per ripristinare uno schermo 
E Per cambiare schermo 


[RETURN] Per uscire dal menù 


Se ad esempio si vuole memorizzare lo schermo attuale nella memoria numero 2, si prema 
2 seguito da S. 


Ritornando all’altro menù (dopo un ripristino, un salvataggio o una manipolazione dello 
schermo), premendo M si ritornerà al menù iniziale. 


Il programma Screen Designer permette di effettuare molte manipolazioni grafiche tra le 
quali vi sono rettangoli, cerchi, triangoli, linee, punti, riempimenti e disegno di caratteri. 


Quando uno schermo è stato completato, può essere salvato su disco usando l’opzione 
Save (Salva) per poi essere ricaricato con Restore (Ripristina). 
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Ora si conclude l’ultimo capitolo del manuale. Usando, facendo 
esperimenti e analizzando i programmi presentati si dovrebbe aver 
acquisito una discreta padronanza del BASIC AMSTRAD e del 
CPC6128 stesso. 


Ulteriori dettagli ... 


Vi sono molte pubblicazioni AMSTRAD e indipendenti che forniscono 
informazioni sul CPC6128, oltre alle specifiche del firmware e del 
BASIC ed informazioni sul sistema operativo CP/M e Dr.LOGO. 


Per concludere presentiamo 4 appendici che comprendono: la licenza 
d’uso di CP/M, un glossario dei termini, alcuni listati di giochi ed un 
indice del manuale. 


Speriamo che abbiate gradito questo manuale e ringraziamo per la 
fiducia accordataci acquistando il CPC6128. 


A vostra disposizione Capitolo 9 Pagina 65 


Appendice 1 
Digital Research e AMSTRAD 


Licenza d’uso per l’utente finale 


Avvertenza per l’utente - leggere attentamente queste avvertenze. Non aprire la 
confezione contenente i dischetti prima di aver letto la licenza. 


L’apertura della confezione implica l’accettazione dei termini e delle condizioni 
contenuti nella licenza. 


1. Definizioni 


In questa licenza d’uso con il termine: 


l. 


DRI si intende DIGITAL RESEARCH (CALIFORNIA) INC., P.O. Box 579, 
Pacific Grove, California 93950, proprietario dei diritti, o licenziatario autoriz- 
zato, del programma. 


Macchina si intende un singolo microelaboratore su cui usare il programma. 
Sistemi con più CPU richiedono ulteriori licenze. 


Programma si intende l’insieme dei programmi, della documentazione e del 
materiale che accompagna questa confezione, oltre agli aggiornamenti e ai 
miglioramenti forniti da DRI all’utente, indipendenti dal modo di utilizzo e da 
eventuali modifiche ad esso apportate. 


AMSTRAD si intende AMSTRAD PLC, Brentwood House, 169 Kings Road, 
Brentwood, Essex CM14 4EF. 


L’utente si assume la responsabilità della scelta del programma per il raggiungi- 
mento dei risultati desiderati e per l’installazione, l’uso ed i risultati ottenuti dal 
programma. 
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2. Licenza 
L’utente può: 
l. Usare il programma su di una singola macchina. 


2. Copiare il programma su qualsiasi supporto stampato o leggibile dalla macchina 
per fare copie di riserva o per modifiche di ausilio all’utilizzo del programma su 
di una singola macchina. A tal fini l’utente può eseguire un massimo di tre (3) 
copie (alcuni programmi, tuttavia, possono essere dotati di meccanismi che 
limitano o impediscono la copia. Questi programmi sono detti “protetti da 
copia”). La copia della documentazione o di altro materiale stampato è vietata. 
E’ vietato inoltre il disassemblaggio del codice. 


3. Modificare il programma e/o unirlo ad un altro da usare su una singola macchima 
(le parti di questo programma unite ad un altro continuano ad essere soggette ai 
termini e alle condizioni di questa licenza). 


4. Trasferire il programma e la licenza a terzi previa notifica del nome e 
dell’indirizzo dell’altra parte a DRI e previo accordo da parte di quest’ultima a: 
a) ad accettare i termini e le condizioni di questa licenza, b) a firmare ed inviare 
a DRI una copia della scheda di registrazione e c) pagare la tariffa vigente per il 
trasferimento. Se il programma viene trasferito ad un’altra parte, con esso devono 
essere trasferite tutte le copie, conpreso l’originale, su supporti stampati o leggibili 
dalla macchina. Tutto ciò che non viene trasferito deve essere distrutto: ciò 
include tutte le modifiche e le parti di programma contenute o unite ad altri. 


In ogni copia o parte unita ad un altro programma è obbligatorio riprodurre ed inserire 
il marchio e le avvertenze relative al copyright. 


Tutti i dischi hanno un numero di serie ed è proibito usare, copiare, modificare, 
trasferire o rendere in altro modo disponibili a terzi, parzialmente o nella sua 
totalità, il programma oppure una sua copia, o modifica o un parte unita, a 
meno che non sia espressamente previsto in questa licenza. 


Trasferendo il possesso di una copia, modifica o parte del programma a terzi 
la licenza terminerà automaticamente. 
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3. Durata 


La licenza è in vigore fino al momento della sua risoluzione. La risoluzione della licenza 
può avvenire in qualsiasi momento con la distruzione del programma e di tutte le sue 
copie, modifiche e parti unite ad altri programmi. La risoluzione avviene anche sulla 
base delle condizioni indicate in altre parti di questo contratto o nel caso in cui l’utente 
non rispetti termini e condizioni espresse nealla licenza stessa. Alla risoluzione del 
contratto di licenza l’utente si impegna a distruggere il programma e tutte le copie, 
modifiche o parti unite ad altri programmi (su qualsiasi supporto si trovino). 


4. garanzia limitata 


Il programma viene fornito ’tal quale’, né DRI né AMSTRAD offrono alcuma 
garanzia di alcun genere, espressa od implicita, comprese, ma non limitate, a 
quelle implicite di commerciabilità e di adeguatezza ad uno scopo specifico. 


Tuttiirischi relativi alla qualità e alle prestazioni del programma sono a carico 
dell’utente . Se il programma dovesse rivelarsi difettoso, tutti i costi relativi 
all’assistenza, alla riparazione o alla correzione sono a carico dell’utente, e 
non della DRI o della AMSTRAD. 


La DRI e la AMSTRAD non garantiscono che le funzioni contenute nel programma 
soddisfino le necessità dell’utente né che il suo funzionamento sia continuo o privo di 
errori. 


La AMSTRAD garantisce tuttavia che il disco su cui è fornito il programma è esente da 
difetti materiali e di fabbricazione, e rimarrà tale, in condizioni di uso normale, per un 
periodo di novanta (90) giorni dalla data di acquisto (garantita da una copia della 
ricevuta). 


5. Limitazione dei risarcimenti 


La AMSTRAD accetta la responsabilità e garantisce come unico risarcimento la 
sostituzione di dischi che non corrispondano a quanto previsto nella ‘Garanzia limitata’, 
previa restituzione del disco da sostituire accompagnato da una copia della ricevuta di 
acquisto. 


In nessun caso la DRI o la AMSTRAD accetteranno responsabilità per danni, 
compresi quelli di mancato profitto o risparmio, o altri danni speciali indiretti 
o consequenziali, e ciò anche se la possibilità di danno viene notificata. La DRI 


e la AMSTRAD non accetteranno responsabilità neppure per altri reclami 
presentati da terzi. 


Licenza d'uso per l'utente finale Appendice 1 Pagina 3 


6. Scheda di registrazione 


La DRI si riserva il diritto di aggiornare i propri programmi. Questi aggiornamenti 
vengono forniti all’utente solo nel caso in cui la scheda di registrazione debitamente 
firmata sia registrata presso gli uffici centrali della DRI o un centro autorizzato a tale 
raccolta. La DRI non è obbligata a produrre aggiornamenti di ogni programma, né a 
fornire una copia all’utente. 


7. Generalità 


L’utente non può concedere ad altri, assegnare o trasferire la licenza del programma, 
eccezion fatta per le condizioni espressamente previste in questo contratto. Qualsiasi 
tentativo di concedere ad altri, assegnare o trasferire i diritti, doveri o obblighi contenuti 
nel contratto di licenza la rendono nulla. 


Il presente contratto è soggetto alle leggi internazionali. 


Eventuali quesiti ad esso relativi devono essere indirizzati alla DRI, Digitale Research 
Inc., P.O. Box579, Pacific Grove, California 93950. 


Il presente contratto non può e non deve essere modificato da ordini di 
acquisto, pubblicità o altre comunicazioni da parte di alcuno. Può essere 
modificato solo con modifica scritta compilata dall’utente e da un funzionario 
autorizzato della DRI e della AMSTRAD. L’utente riconosce di aver letto, 
compreso ed approvato il presente accordo e di accettarne i termini e le 


condizioni. Accetta inoltre che il presente contratto supera qualsiasi proposta 
o contratto precedente, scritto o orale, e qualsiasi comunicazione fra l’utente 
e la DRI o la AMSTRAD avente come oggetto il presente contratto. 


Il presente accordo non viola i diritti costituzionali dell’utente. 
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Appendice 2 
GLOSSARIO DEI TERMINI 


Alcuni dei termini usati più comunemente in ambiente informatico 
spiegato agli utenti del CPC6128... 


AID 

Analogico 

Uno stato in cui la modifica tra l’inizio e la fine di un punto accade gradualmente invece 
che con passi istantanei. I computer sono dispositivi digitali; il mondo naturale è basato 
su principi analogici quindi, il computer deve eseguire una conversione da analogico a 
digitale (A/D) prima di poter processare i dati di una sorgente analogica. 


Accoppiatore acustico 

Noto anche come Modem acustico. E’ uno strumento elettronico che serve a connettere 
un telefono al computer ed abilita quest’ultimo a comunicare mediante la normale linea 
telefonica. In tal modo il computer può comunicare con un servizio di informazione 
pubblica come Videotel, o con altri utenti per scambiare software ed ottenere dati. 


Accumulatore 

Una locazione di memoria all’interno del microprocessore, che memorizza temporane- 
amente i dati mentre vengono elaborati. Sono molto usati nella programmazione in codice 
macchina; non è necessario per gli utenti di BASIC essere a conoscenza della loro 
esistenza. 


Alfabetizzazione informatica 
Un’altra espressione pomposa che significa conoscenza dei computer. 


Alfanumerico 
Gli attributi che descrivono la differenza tra lettere o numeri e caratteri grafici. 


Algebra booleana 
E’ una istruzione di relazione logica che può assumere solo due forme: vera o falsa. Questi 
ultimi sono denotati di solito 0 o 1. 


Algoritmo 
Un nome pomposo per una formula complicata. E’ una sequenza di passi aritmetici e 
logici al fine di eseguire un calcolo. 


Alimentatore 
Permette di utilizzare la corrente di una normale presa per alimentare il computer. 


ALU 

Arithmetic Logic Unit (Unità Logico Aritmetica) E’ la parte di microprocessore che 
esegue le operazioni aritmetiche e logiche: non riguarda l’utente direttamente ad 
eccezione dei programmatori in linguaggio macchina. 
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AMSDOS 
AMStrad Disc Operating System o sistema operativo a dischi AMSTRAD. E’ il 
programma che permette al BASIC Locomotive di accedere ai file su disco. 


Animazione 

I cartoni animati sono la forma meglio conosciuta di animazione; l’animazione su un 
computer è basata sul concetto di movimento di elementi grafici per simulare l’idea del 
movimento ‘reale’. 


Architettura 
Il modo particolare di un computer di collegare una periferica alla CPU. 


Archivio 
Un insieme di qualsiasi tipo di dati in un formato indirizzabile dal computer. 


Argomento 
Una variabile indipendente, ovvero nell’espressione x+y=z, i termini x,y e z sono 
argomenti. 


ASCII 

American Standard Code for Information Interchange. Il modo più comunemente usato 
per rappresentare numeri, lettere ed altri simboli che possono essere inseriti dalla tastiera 
del computer o richiamati usando altri comandi. 


Assembler 

Un metodo di programmazione in cui le istruzioni in linguaggio macchina vengono 
richiamate in modo mnemonico (lettere che suggeriscono la funzione che deve essere 
eseguita dalla corrispondente routine in linguaggio macchina). 


Avviamento “a caldo” 
Viene eseguito mediante [CTRL]C premuto durante l’esecuzione di CP/M. Tale avvia- 
mento reinizializza il sotto-sistema del disco e fornisce il controllo nuovamente al CP/M. 


Avviamento “a freddo” 
Il processo di avviamento ed inizializzazione di un sistema operativo. Viene operato 
mediante il comando ICPM. 


Base 

L'aspetto numerico più importante per qualunque matematico. La base di ogni rappre- 
sentazione numerica. Il sistema binario ha base 2; il sistema decimale ha base 10 e quello 
esadecimale ha base 16. 
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BASIC 

Beginner’s All-purpose Symbolic Instruction Code. Un linguaggio di programmazione 
interpretativo usato in quasi tutti i computer domestici. BASIC è stato progettato in modo 
specifico per essere semplice da apprendere e facile da usare poichè permette ai 
programmi di essere ‘uniti’ tra loro e testati (eseguiti) a qualsiasi stadio del loro sviluppo 
al contrario dei compilatori nei quali il programma, prima di essere eseguito, deve essere 
stato completato. 


Baud 
Un bit per secondo: è l’unità di misura della velocità alla quale un segnale digitale viene 
trasmesso in sistemi di comunicazione seriali. 


BCD 
Binary Coded Decimal. Un sistema di codifica per numeri decimali nel quale ogni cifra 
viene rappresentata come un gruppo di quattro cifre binarie. 


BDOS 
Basic Disc Operating System - E’ la parte del CP/M che permette ad un programma utente 
di utilizzare le possibilità del CP/M. 


Binario 
Il sistema numerico di base 2 nel quale tutti i numeri sono composti dalle cifre 0 e 1 
(vedere la Parte 1 del capitolo intitolato “A vostra disposizione ... ‘°). 


BIOS 

Basic Input Output System. Questa è la parte del CP/M che dipende dalla macchina e che 
viene preparato in modo specifico per un dato tipo di computer. Tutto l’Input e l’Output 
riguardanti lo schermo, la tastiera, il disco ecc. viene gestito dal BIOS. 


Bit 
Abbreviazione di BInary digiT (ovvero cifra binaria). Una cifra binaria è composta da 0 
e 1 e sono usati nel sistema numerico binario. 


Bit meno significativo 
In un numero binario il bit meno significativo (Least Significant Bit o LSB) è il bit 
all’estrema destra di una espressione. 


Bit più significativo 
In un numero binario il bit più significativo (Most Significant Bit o MSB) è il bit 
all’estrema sinistra di una espressione. 


Boot 

Il processo di caricamento del sistema operativo. Quando si avvia il CP/M da BASIC, dal 
disco viene caricato un breve programma di avvio che a sua volta carica il resto del 
sistema operativo. 
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Buffer 

Un’area di memoria passeggera contenente informazioni nel corso di un trasferimento di 
queste da una parte all’altra del sistema, ad esempio da una cassetta all’unità centrale del 
computer (CPU) e nella RAM. Un buffer regola il modo con cui i dati vengono inviati al 
dispositivo operante ad una velocità diversa come, ad esempio, un modem o una 
stampante. 


Bug 

Un problema che varia da un ‘comportamento inaspettato’ basato su alcuni aspetti oscuri 
di un programma (come ad esempio se si premono quattro tasti contemporaneamente si 
modifica il colore dello schermo) ad una sequenza che rovina irrevocabilmente e 
completamente un programma o cancella la memoria di dati. 


Bus 

Un gruppo di connessioni all’interno del computer o che lo collegano al mondo esterno 
che trasportano informazioni sullo stato della CPU, della RAM ed altre caratteristiche 
hardware. Il bus del CPC6128 è presente sul pettine di nome EXPANSION situato sul 
retro della tastiera. 


Byte 
Un gruppo di otto bit, che formano la parte più piccola della memoria che una CPU ad 
otto bit possa richiamare e memorizzare. 


CAD 

Computer Aided Design (progettazione assistita dal computer). Una interazione di 
potenza di calcolo e grafica al fine di fornire una tavola di disegno elettronica, sebbene 
qualsiasi calcolo eseguito su un computer nel corso di un progetto prende il nome di CAD. 


CAE 

Computer Aided Education (educazione assistita dal computer). L’aiuto del computer 
per l’educazione. CAI (Computer Aided Instruction ovvero istruzione assistita dal 
computer) e CAI (Computer Aided Learning ovvero apprendimento assistito dal compu- 
ter) sono due aspetti del CAE. 


Canale 
La via usata dal computer per effettuare un output: lo schermo, la stampante o una 
cassetta. 


Carattere 
Un qualsiasi simbolo che può essere rappresentato e visualizzato dal computer, incluso 
lettere, numeri e simboli grafici. 
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Carattere grafico 
Una forma o un modello che può servire a creare immagini. 


Cartuccia 

Uno speciale circuito integrato contenente software che può essere inserito direttamente 
nel computer mediante una presa specifica. Il software fornito su cartuccia viene caricato 
ed eseguito più velocemente delle normali cassette, ma il suo costo è notevolmente 
superiore. 


Cassette 
Oltre alle ovvie cassette di musica è un termine generico che racchiude una gamma di 
‘pacchetti’ incluso il software ROM, ecc. 


Cattura di dati 
Il termine che descrive la raccolta di dati da una sorgente esterna che è collegata in qualche 
modo ad un computer centrale. 


CCP 
Console Command Processor. E’ una parte del CP/M che interpreta ed esegue l’input 
ricevuto dalla tastiera. 


Chip 

Un ingannevole ma popolare riferimento a qualsiasi forma di circuito integrato elettro- 
nico. Il ‘chip’ è in effetti un piccolo rettangolo di materiale silicio con il quale il circuito 
è costruito. 


Ciclo 
Un processo in un programma che viene eseguito ripetutamente da computer finchè una 
condizione viene soddisfatta. 


Circuito integrato 
Un insieme di circuiti elettronici miniaturizzati ed inseriti in un unico pezzo di silicio. 
Vedere anche chip. 


Codice 
A prescindere dalle implicazioni letterali, tale termine è usato frequentemente come 
abbreviazione di ‘codice macchina’. 


Codice a barre 

Si guardi ad esempio sotto la confezione di una saponetta. Un computer che legge codici 
a barre può leggere mediante tecniche ottiche come la scansione mediante un laser a bassa 
energia. 
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Codice macchina 
Il linguaggio di programmazione direttamente comprensibile da microprocessore, i cui 
comandi sono composti da cifre binarie. 


Comandi interni 
Comandi che appartengono al sistema operativo. Sono più veloci dei programmi 
transienti in quanto non vengono caricati da disco. 


Comando 
Una istruzione di programmazione. 


Compilatore 

Un programma che converte programmi scritti in un linguaggio interpretativo ad alto 
livello come il BASIC in istruzioni in codice del microprocessore, in tal modo le 
operazioni vengono eseguite ad una velocità molto maggiore. 


Computer della quinta generazione 
Sono soprattutto grossi computer che si pensa possano giungere ad autoprogrammarsi 
usando gli sviluppi dell’intelligenza artificiale. 


CP/M 
Sistema operativo standard della Digital Research che fornisce un’interfacia standard a 
programmi scritti per un’ampia gamma di sistemi a microprocessore. 


CPU 

Central Processing Unit (Unità centrale di elaborazione). Il componente nel cuore di 
qualsiasi computer che interpreta le istruzioni e fa sì che quest’ultimo le esegua; in un 
microcomputer, la CPU è il microprocessore stesso. 


Cursore 
Un indicatore spostabile che indica il luogo, sullo schemo, in cui apparirà il carattere 
successivo. 


Cursore grafico 

E’ simile al cursore del testo, ma è utilizzato nello schermo grafico. E’ un elemento 
invisibile nel CPC6128 ma nonostante ciò è indispensabile per fare disegni. Non deve 
essere confuso con i caratteri grafici che appartengono al set di caratteri e vengono 
stampati alla posizione del cursore del testo. 


Debugging 
L’eliminazione degli errori in un programma mediante una combinazione di tentativi e 
metodi più scientifici. 
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Diagnostica 
Un messaggio prodotto automaticamente dal computer per indicare e identificare un 
errore in un programma. 


Diagramma di flusso 
Una rappresentazione dei passi di un programma che indica la sequenza degli eventi che 
avvengono durante l’esecuzione di un programma. 


Digitale 
Descrive l’espressione “di modifica di quantità in termini di passi discreti piuttosto che 
continui. E’ l’opposto di analogico. 


Digitalizzatore 
Un dispositivo per inserire informazioni analogiche in un computer. Si fa riferimento di 
solito in unione con le tavolette grafiche. 


Direttrice 
Una parte di disco che contiene alcune informazioni relative ad ogni file del disco. E’ un 
elenco di ciò che è contenuto nel disco. 


Disco 

Un disco di plastica piatto e circolare rivestito su uno o entrambi i lati con una superficie 
magnetica ed usato come mezzo di memorizzazione dei dati. Il disco è sempre situato in 
una busta di protezione quadrata di carta o di plastica; ad esso si accede mediante una 
finestra di lettura situata sulla busta di protezione. 


Documentazione 
I manuali forniti con il computer o il software che spiega il suo uso. 


Doppia faccia 
Un disco che può memorizzare informazioni su entrambi i lati. Un drive per dischi a 
doppia faccia permette di utilizzare entrambe le facce del disco senza girarlo. 


DOS 

Disk Operating System. Il software che controlla tutte le operazioni di un drive; si 
comporta come un sorvegliante nel ‘parcheggio’ rappresentato dalla disposizione logica 
del disco. : 


Drive 
L’unità che registra le informazioni sulla superficie magnetica di un disco e ‘legge’ le 
informazioni registrate. 


Dr. LOGO 
La versione di LOGO (un linguaggio che utilizza la “tartaruga grafica”) prodotto dalla 
Digital Research. 
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Editing 
Correzione di dati, di un programma o di testi. 


Editor 
Un programma che si trova normalmente nella ROM del computer e che permette il 
processo di editing. 


Editor di schermo 
Un editor di testi o programmi in cui il cursore può essere spostato sullo schermo. 


EPROM 

Erasable Programmable Read Only Memory. Simile a una PROM ma i dati contenuti nel 
chip possono essere cancellati usando raggi ultravioletti e quindi riprogrammati. Una 
EEPROM è simile ma viene cancellata elettricamente. 


Errore di sintassi 
Si presenta se viene infranta una regola sull’uso delle parole chiave o delle variabili. Il 
BASIC presenterà il messaggio Syntax error. 


Espressione 

Una formula semplice o complessa usata in un programma per eseguire un calcolo. 
L’espressione definisce normalmente la natura dei dati che può utilizzare. In Dr. LOGO 
una espressione consiste di un nome di procedura seguito dagli input della procedura 
stessa. 


File 
Una raccolta di informazioni, normalmente memorizzata su cassetta o disco. Alcuni 
computer possono usare anche file su RAM. 


File Esadecimale 
Una rappresentazione in ASCII di un file di comandi o di un file in codice macchina. 


Firmware 
Software contenuto in ROM: un punto di incontro tra puro software e puro hardware. 


Floppy 
Un disco magnetico estraibile di 5.25' o di 8' di diametro utilizzato per memorizzare i dati. 


E’ contenuto in una busta protettiva; ha una capacità molto superiore a quella di una 
cassetta. E’ molto più veloce e più costoso. 


Foglio elettronico 
Un programma che permette di riempire e manipolare righe e colonne di numeri. 
Modificando un numero cambiano tutti quelli che da esso dipendono. 
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Forth 

Un linguaggio di programmazione ad alta velocità con una velocità e una complessità che 
si trova tra un linguaggio ad alto livello e il linguaggio macchina: non è un linguaggio per 
principianti. 


Generatore sonoro 
La parte hardware e software di un computer, dedicata alla produzione di suoni. 


Generazioni di computer 

Le nuove scoperte tecnologiche hanno prodotto diverse fasi di sviluppo nel campo dei 
computer. In tal modo si sono prodotte diverse generazioni di computer a seconda delle 
varie tecnologie usate per costruirli. 


Giochi di avventura 

Un culto per alcuni e una noia per altri. Giochi basati su testi nei quali l’utente che gioca 
è invitato a partecipare in una serie di eventi pseudo-casuali basati sulla ricerca di un via 
di uscita in un labirinto. 


Giochi d’azione 

E’ il tipo di gioco per computer dove: gli uomini spaziali invadono e vengono conquistati, 
mostri insaziabili inseguono in un labirinto e si impadroniscono di un incauto, personaggi 
sotto il controllo dell’utente cercano di evitare in tutti i modi una spiacevole ‘morte’. Sono 
divertenti e permettono di sviluppare buoni riflessi ma sono di scarsa utilità per gli 
studenti informatici. 


Grafica 

La parte dello schemo del computer che non è in relazione alla visualizzazione dei 
caratteri ma al disegno di linee, di cerchi, di grafici ecc. Con una stampante appropriata 
è possibile anche avere copie dello schermo su carta. 


Grafica della tartaruga 
L’immagina grafica lasciata sullo schermo dal movimento della tartaruga. Man mano che 
la tartaruga si muove, lascia una scia sullo schermo. 


Handshaking 
Una sequenza di segnali elettronici che inizia, controlla e sincronizza lo scambio di dati 
tra un computer e una periferica o tra due computer. 


Hardcopy 
Stampa su carta di un programma, di altri testi o di uno schermo grafico. In questo caso 
lo schermo viene chiamato softcopy. 


Hardware 
La parte elettronica e meccanica di un computer; tutto ciò che non è software o firmware. 
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I/O 
Input/Output. 


IEEE-488 
Una delle interfacce standard per collegare i dispositivi ad un microcomputer. E’ simile 
ma non completamente compatibile con l’interfaccia parallela Centronics. 


Indirizzo 

E° il numero in una istruzione che identifica la locazione di una ‘cella’ nella memoria del 
computer. Mediante tale indirizzo è possibile selezionare una locazione di memoria 
particolare in modo sia possibile trovare e leggere il suo contenuto o, nel caso della RAM 
leggervi e scrivervi dopo eventuali modifiche. 


Ingegneria del software 
Indica la programmazione di un computer, utilizzando tecniche precise e non un 
approccio intuitivo. 


Inizializzazione 

Accensione di un sistema e dichiarazione di particolari valori delle variabili prima di 
iniziare l'esecuzione di un corpo di un programma; ad esempio la dichiarazione di una 
variabile intera, ecc. 


Input 
Tutto ciò che entra nella memoria del computer dalla sua tastiera, dalla sua unità a 
cassette, dal suo disco, dall’interfaccia seriale o da un altro dispositivo. 


Insieme di istruzioni 

Il processo logico e matematico più importante eseguito da un microprocessore. Ogni 
istruzione di alto livello (compresi i codici mnemonici dell’assembler) devono essere 
tramutati in istruzioni comprensibili dal computer. Un solo comando ad alto livello può 
provocare l’esecuzione di molte istruzioni dell’insieme compreso dalla CPU. 


Intelligenza artificiale AI 
Tecniche di programmazione che permettono al programma di apprendere dalle espe- 
rienze passate. 


Interattivo 

Si riferisce normalmente a programmi in cui il computer chiede all’utente di fornire vari 
tipi di input che possono servire a controllare una nave spaziale in un gioco di azione o 
a rispondere a domande in un programma educativo. L'azione dell’utente avrà effetto in 
tempo reale, cioè durante l’esecuzione del programma. 
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Interfaccia 

E° una porta di accesso al computer sia in termini elettrici che umani. Le interfacce di cui 
è dotato il CPC6128 sono la tastiera (input), lo schermo (output) e tutte le prese che si 
trovano sul retro e che servono a collegare varie periferiche al computer. 


Interfaccia parallela 

Interfaccia per stampante del CPC6128 che permette di utilizzare una stampante 
parallela; ciò significa che ogni linea di dati del bus viene collegata ad un corrispondente 
input della stampante. I dati vengono trasferiti molto più velocemente usando un’inter- 
faccia parallela piuttosto che una interfaccia seriale in quanto quest’ultima deve prima 
preparare il formato di un byte ed inserire poi informazioni di sincronizzazione. 


Interfaccia Seriale 
Questo termine si riferisce soprattutto all’interfaccia RS232 ma esistono altri standard 
per la comunicazione seriale dei dati. 


Intero 
Un numero senza il punto decimale. 


Interprete 

La parte del software di sistema che interpreta un linguaggio ad alto livello per fare in 
modo che possa essere compreso dalla CPU. Ad esempio il codice BASIC immesso da 
tastiera viene convertito nel linguaggio interno del computer. 


Istruzione 
Un comando che chiede al computer di eseguire una data operazione. Una sequenza di 
istruzioni formano un programma. 


Iterazione 

Uno degli elementi del calcolo. Il computer esegue tutti i compiti spezzandoli in parti più 
semplici che possono essere gestite dalla CPU. Per fare ciò il computer deve continuare 
ad eseguire molti elementi più semplici fino al verificarsi di una particolare condizione. 


Joystick 
Un dispositivo di input che sostituisce generalmente le funzioni dei tasti cursore e rende 
molti giochi più facili e più semplici. 


K 
Abbreviazione di Kilo che nel mondo dei calcolatori è molto utilizzato per kilobyte che 
corrisponde a 1024 byte e cioè a 2 elevato a 10. 


Leggibile da una macchina 
Un mezzo o una informazione che può essere direttamente compresa da un computer 
senza immissione dalla tastiera. 
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Lettura e scrittura 
Un attributo assegnato ad un disco, ad un file o ad un drive che permette di scrivervi o 
leggervi dei dati. 


Linguaggi di alto livello 

Linguaggi scritti in una forma facilmente comprensibile in cui il vero linguaggio fa la 
maggior parte del lavoro di interpretazione. Sono più lenti dei programmi in linguaggio 
macchina ma molto più comprensibili. 


Linguaggio a basso livello 
Ad esempio il linguaggio Assembler. E’ un linguaggio di programmazione in cui ogni 
istruzione corrisponde ad una istruzione della macchina. 


Linguaggio di programmazione 
E’ ciò che permette di scrivere un programma; è costituito da un insieme di rigide regole 
sull’uso delle parole e dei numeri. 


LISP 
Abbreviazione di LISt Processing language o linguaggio per la gestione delle liste. E’ un 
altro linguaggio ad alto livello per computer. 


Logica 
Componenti elettronici che eseguono le elementari operazioni e funzioni logiche che 
compongono ogni operazione di un computer. 


Logo 
E’ un linguaggio per computer semplice da imparare ed orientato alla grafica usato 
frequentemente nelle scuole come aiuto all'insegnamento dell’informatica. 


LSI 
Large Scale Integration (Integrazione spinta a larga scala). Lo sviluppo dei circuiti 
integrati ha permesso di inserire molte funzioni in frammenti di silicio sempre più piccoli. 


Mappa di memoria 
La disposizione della memoria con i vari indirizzi e la locazione di memoria delle varie 
funzioni, ad esempio lo schermo, il sistema di gestione del nastro, ecc. 


Matrice 

La disposizione di punti che formano la cella di carattere sullo schermo o sulla testina di 
stampa di una stampante a matrice. E’ anche un termine usato in matematica e in 
informatica per denotare i vettori. 


Appendice 2 Pagina 12 Gossario 


Memoria 

Il computer memorizza molte informazioni e dati disposte in modo logico e accessibili 
uno ad uno. E’ anche conosciuto come RAM, memoria ad accesso diretto, dove le 
informazioni possono essere memorizzate o lette, o ROM dove le informazioni possono 
essere lette ma non scritte. I dischi e i nastri sono esempi di memoria esterna. 


Menù 
Un elenco delle varie opzioni che possono essere eseguite in un determinato ambito e che 
possono essere selezionate dall’utente. 


Microprocessore 
Un circuito integrato che si trova nel cuore del computer e che esegue le istruzioni che 
gli vengono presentate dall’interprete BASIC. 


Modem 

Un MODulatore/DEMulatore che permette di collegare il computer ad una linea 
telefonica o a un altro dispositivo di trasmissione seriale comprese le fibre ottiche. Vedere 
anche accoppiatore acustico. 


Modo console 
E° il modo diretto di CP/M; sullo schermo appare la A> ed il sistema attende un input di 
un comando CP/M o di un programma di utilità. 


Modo grafico 

I primi microcomputer dovevano essere predisposti appositamente per gestire o i caratteri 
o la grafica. I moderni personal computer possono utilizzare simultaneamente testo e 
grafica. 


Modulatore RF 
Un dispositivo che permette di inviare l’output video di un computer alla presa d’antenna 
di un normale televisore. 


Monitor 
Lo schermo di un computer; il termine descrive anche il programma in linguaggio 
macchina che permette di accedere alle operazioni più a basso livello del computer. 


Mouse 

Una piccola scatola che contiene una sfera di gomma. Spostato su una superficie permette 
di muovere il cursore a piacimento. E° stato progettato per superare la paura della tastiera 
e per rendere il software più amichevole. 


Nibble 
Mezzo byte. Una espressione binaria a quattro bit. Ogni cifra di un numero esadecimale 
rappresenta un nibble. 
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Nome di file ambiguo 
Un nome di file contenente uno o più caratteri jolly. Tali nomi possono fare riferimento 
a più di un file. 


Notazione decimale 
Sistema di numerazione in base 10, nel quale si usano cifre da 0 a 9, che rappresentano 
unità, decine, centinaia, migliaia, ecc. 


Notazione esadecimale 
Sono numeri in base sedici. Indicati nel CPC6128 dal prefisso & o &H. 


Notazione polacca inversa 

E’ un metodo utilizzato da alcuni calcolatori per eseguire le operazioni aritmetiche. In tale 
notazione, gli operatori (+, -, *, /) vengono posti di fronte ai valori ai quali vengono 
applicati. 


Numeri a virgola fissa 
Un numero rappresentato, utilizzato e memorizzato con un punto decimale in posizione 
fissata. 


Numeri a virgola mobile 

Un numero Reale utilizzato e memorizzato con un punto decimale che può trovarsi nella 
posizione desiderata. Questo metodo è particolarmente utile quando si utilizzano grossi 
numeri. 


Numeri binari 
Un numero rappresentato in notazione binaria. Denotati nella programmazione con il 
CPC6128 dal prefisso &X; ad esempio: &X0101 è equivalente (in decimale) a 5. 


Numero casuale 
Un numero generato dal computer in modo irripetibile ed imprevedibile. 


Numero da leggere bit a bit 
In tali numeri l’informazione viene estratta considerando lo stato di ognuno degli otto bit 
che compongono un byte. Il valore decimale intero può non avere significato. 


Numero di linee 
Il BASIC e alcuni altri linguaggi usano programmi il cui ordine è stabilito dai numeri di 
linea. 


Numero intero 
Un numero senza parte frazionale, cioè un numero senza virgola. E’ il contrario del 
numero reale che è composto da una parte intera e una parte frazionale. 
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Numero reale 
Un numero che ha una parte intera ed una frazionale. Una variabile reale rimane tale anche 
se in un dato momento dell’esecuzione del programma può contenere un numero intero. 


Off line 
La periferica di un computer (un terminale o una stampante) che non è connessa in modo 
attivo o utilizzabile dall’unità di elaborazione. 


On line 
L’opposto di off line. 


Operatore 
La parte di un’espressione aritmetica che permette di modificare dei numeri, ad esempio 
+, -,/ecc. 


Orologio 
Il sistema di temporizzazione di un computer usato per sincronizzare e gestire le 
operazioni di un computer. L’orologio in tempo reale mantiene l’ora, la data ecc. 


Ottale 
Un sistema numerico in base otto in cui ogni cifra (da 0 a 7) è composto da tre bit. 


Output 
Tutto quanto esce da un computer come risultato di qualche calcolo. 


Paddle 
Nome alternativo per il joystick. 


Pagina zero 
E’ la parte della memoria dell’ambiente CP/M che si trova tra &0000 e &01Q0 e che viene 
utilizzata per contenere inportanti parametri di funzionamento. 


Parola chiave 
Una parola il cui uso all’interno di un programma o di un linguaggio è riservato per una 
particolare funzione o comando. 


Parola riservata 

Una parola che ha un significato particolare all’interno di un programma e che non può 
perciò essere utilizzata per altri scopi. Ad esempio, il BASIC non potrà accettare NEW 
come nome di variabile in quanto essa è già riservata per altri scopi. 


Pascal 

Un linguaggio di programmazione strutturato ad alto livello che deve essere compilato 
prima di essere eseguito e che quindi viene eseguito molto velocemente. E’ in genere il 
linguaggio di programmazione, dopo il BASIC, che uno studente apprende. 
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Passo della tartaruga 
La più piccola distanza che la tartaruga può coprire. Normalmente è un pixel. 


PEEK 
La funzione BASIC che permette di leggere direttamente la memoria del computer e 
restituisce il valore di una data locazione. 


Penna ottica 
Un dispositivo alternativo di input che utilizza una penna. 


Periferica 
Stampanti, Modem, Joystick, drive per dischi - tutto quanto si collega al computer per 
espandere le sue capacità. 


Pixel 
La più piccola parte di schermo che può essere controllata dall’hardware. 


Plotter 
Un particolare tipo di stampante che permette di tracciare disegni utilizzando delle penne 
invece di una testina di stampa. E’ usato per output tecnico e grafico. 


POKE 
La parola chiave del BASIC che permette di inserire un dato valore in una specifica 
locazione di memoria. 


Porta 
Le porte logiche permettono il passaggio di dati al verificarsi di determinate condizioni. 
Vi sono diversi tipi di porte (OR, AND, XOR, ecc.). Si veda Algebra booleana. 


Porta 
Un punto di collegamento per l’input e l’output dei dati. 


Portabilità 
Indica la possibilità di utilizzare un determinato programma su vari computer - ciò è 
permesso da sistemi operativi compatibili come CP/M della Digital Research. 


Primitive 
Procedure, operazioni o comandi che costituiscono il Dr.Logo; le procedure interne. 


Programma 
E° l’insieme di istruzioni che fa risolvere al computer un determinato problema; può 
andare da una semplice routine in codice macchina ad un intero programma di elabora- 
zione di testi. 
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Programma di avviamento 

I programmi e sistemi operativi non si caricano da soli ma vengono caricati da una piccola 
routine situata (di solito) nella ROM che effettua il processo di caricamento in una 
locazione di memoria specifica. 


Programmazione strutturata 
Una tecnica di programmazione che permette di produrre programmi che seguono passi 
ben definiti. 


Programmi applicativi i 
E’ un programma che invece di essere uno strumento di applicazione generale ha un 
compito preciso ad esempio un assemblatore, un driver per stampanti ecc... 


Programmi transienti 
Una utility di CP/M come ad esempio PIP che può essere caricata nella TPA e può essere 
eseguita inserendo il nome dalla tastiera. 


PROM 
Programmable Read Only Memory. Un circuito integrato che una volta scritto non può 
essere cancellato (vedere anche EPROM). 


Prompt 

Simbolo o messaggio visualizzato sullo schermo che permette all’utente di rispondere al 
computer o continuare un input. Il BASIC usa un semplice punto di domanda per 
richiedere dell’input o la parola Ready quando attende un comando. 


Protezione dalla scrittura 
Permette di evitare di modificare un file o un disco. un disco protetto da scrittura è un file 
a sola lettura. 


QWERTY 
Un termine di uso comune che descrive una tastiera inglese. 


RAM 
Random Access Memory o memoria ad accesso diretto. E’ un tipo di memoria che può 
essere letto o scritto, mediante i circuiti del computer in fase di esecuzione del programma 


Raster 
Un tipo di scrittura sullo schermo, in cui le immagini sono composte da un certo numero 
di scansioni orizzontali. 


Refresh . 

Permette di aggiornare le informazioni, sullo schermo o in memoria. Non è necessa- 
riamente un processo distruttivo, a volte ripristina semplicemente ciò che è già presente 
sullo schermo o in memoria. 
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Registro 
Una locazione di memoria all’interno della CPU. 


REM 
Una istruzione che non viene eseguita ma serve a ricordare al programmatore che cosa 
il programma sta facendo e quando il programma è stato fatto. 


Rete 
Quando due computer o più sono collegati insieme per scambiare dati e informazioni 0 
via cavo o via modem. 


Riconoscimento ottico dei caratteri 
Un mezzo per leggere caratteri stampati o scritti utilizzando un lettore ottico. 


Riconoscimento vocale 
La conversione delle parole in istruzioni leggibili da una macchina. 


Ricorsione 
Un insieme di passi all’interno di un programma o di una routine in cui il risultato di ogni 
ciclo è in relazione con il precedente. 


Risoluzione 
La capacità di stabilire dove termina un elemento dello schermo e dove inizia il 
successivo. Indica anche la possibilità del computer di eseguire operazioni su numeri 
molto grossi. 


ROM 
Read Only Memory, memoria a sola lettura, una volta scritta non può essere né cancellata, 
né riscritta. 


Routine 

Parte del programma che esegue un compito ben determinato. Può trovarsi all’interno del 
programma o al suo esterno, in modo che possa essere incorporata. Un programma che 
genera un orologio può essere considerato una routine. 


RS232C 

Uno standard per le comunicazioni seriali. Entrambi i dispositivi che si trovano alle 
estremità devono essere configurati secondo le caratteristiche della trasmissione. Si 
confronti con l’interfaccia Centronics. 


Rumore 

Le possibilità sonore del CPC6128 permettono di inserire una quantità variabile di 
rumore usando il comando sound in modo da creare effetti come ad esempio delle 
esplosioni. 
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Scorrimento 
E° il modo in cui lo schermo scorre quando viene raggiunto il fondo. 


Separatore 
Esegue la stessa funzione di un delimitatore: indica i confini tra le parole riservate ed altri 
elementi di un programma o dei dati. 


Set di caratteri 

Tutte le lettere, numeri e simboli disponibili su un computer o su una stampante. Il fatto 
che un carattere esista su un computer non implica necessariamente che questo sia 
disponibile su un stampante. 


Settore 
Un blocco di dati su disco. Il sistema AMSTRAD usa un settore di 512 bytes. 


Simulazione 
Tecnica per sperimentare su computer alcuni processi della vita reale, ad esempio il volo, 
la guida di un’auto, ecc. 


Sintesi vocale 
Generazione di parole usando hardware e software 


Sistema operativo 
Il sorvegliante del “parcheggio” costituito dalla memoria del computer. E’ composto da 
software che gestisce le precedenze e le sincronizzazioni nelle operazioni del computer. 


Software 
Vedere Programmi. 


Sola lettura 
Un attributo assegnato ad un disco, ad un file o a un drive che evita di scrivere su di esso 
dei dati. 


Sovrascrittura 
Cancellazione di un’area di memoria e sostituzione del suo contenuto con altri dati. 


Sprite 
Un carattere dello schermo che si può muovere liberamente per lo schermo. 


Stack 
Un’area di memoria che serve ad “impilare” informazioni, ma in cui solo l’ultimo 
elemento della fila può essere richiamato. 
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Stampante 
Dispositivo che permette di stampare testi e grafica. 


Stampante a margherita 
Una stampante che può produrre documenti di alta qualità. I caratteri stampati vengono 
creati mediante l’impatto delle lettere contro il nastro inchiostrato. 


Stringa di caratteri 
Una parte di dato <variabile> comprendente una sequenza di caratteri che può essere 
memorizzata o trattata come una singola unità, cioè una parola o un insieme di parole. 


Subroutine 
Vedere Routine. 


Tabelle di verità 
Il risultato di un’operazione logica può essere vero o valso, 1 o 0. Le tabelle di verità 
indicano i valori di verità del risultato di un’operazione logica. 


Tartaruga 
Un simbolo grafico a forma di punta di freccia che viene utilizzato come cursore grafico 
durante l’utilizzo di Dr.Logo. 


Tasti definibili dall’utente 
Il 6128 ha 32 tasti che possono essere ridefiniti per eseguire compiti più complessi. 


Tasti di controllo del cursore 
Tasti che spostano il cursore nello schermo e che sono frequentemente usati per 
controllare la direzione di azione nei giochi; sono indicati da frecce. 


Tasti funzione 

Adessi è stato assegnato un compito specifico che si può aggiungere o sostituire a quanto 
è scritto sopra il tasto. Alcuni tasti del CPC6128 possono essere definiti come tasti 
funzione, nel qual caso la pressione di un singolo tasto può provocare l’esecuzione di più 
istruzioni. 


Tastiera 
L’insieme dei tasti alfanumerici di cui il computer è dotato per permettere l’inserimento 
di comandi e altre informazioni. 


Tastierino numerico 

L’area sulla tastiera dove si trovano i tasti numerici in modo da facilitare l’inserimento 
dei dati numerici. Nel caso del CPC6128 vi si trovano anche i tasti funzione definibili 
dall’utente. 
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Tavoletta grafica 
Un dispositivo che permette di prelevare le coordinate dei punti di un certo disegno per 
manipolarlo all’interno del computer. E’ una forma di conversione analogica digitale. 


Tecnologia dell’informazione 
Tutto ciò che è in relazione con l’uso dell’elettronica nell’elaborazione dell’informazione 
e nelle comunicazioni: l’elaborazione di testi, le comunicazioni di dati, Videotel ecc. 


Terminale 
Una tastiera con uno schermo o una stampante che permette di collegarsi ad un computer. 


Terminale generico 

Un terminale per computer che si comporta semplicemente come un dispositivo di input 
ed output e non elabora in alcun modo le informazioni. Un terminale stupido è invece un 
terminale in cui non esiste nessun circuito per la gestione del video ed in cui le 
informazioni vengono ricevute semplicemente come un segnale video. 


TPA - Transient program area 
L’area di memoria che va da &0100 dove i programmi CP/M e i programmi utente 
vengono eseguiti e memorizzano dati. 


Tracce di sistema 
Tracce del disco riservate dal sistema CP/M. 


Traccia 
Sono anelli concentrici su un disco. Ogni traccia contiene un numero fisso di settori. Le 
tracce ed i settori vengono fissati durante la formattazione. 


Troncamento 

Un numero o stringa a cui è stata tolta la testa o la coda. 

Utility 

Un programma che esegue una operazione specifica, ad esempio l’ordinamento o la copia 
di un file. 


Variabile 
Un oggetto contenuto in un programma che può essere richiamato mediante il nome ma 
il cui valore può cambiare durante l’esecuzione del programma. 


Vettore 
Una matrice bidimensionale in cui i dati vengono memorizzati secondo coordinate 
orizzontali e verticali. 


XYZY 
Una parola magica che permette di uscire da brutte situazioni in un gioco di avventura. 
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Appendice 3 
Alcuni programmi ... 


Bustout 


Così semplice ed avvincente! Un giocatore contro il computer. Tastiera o Joystick. 


19 'BUSTOUT by ALEXANDER MARTIN 
20 'copyright (c) AMSOFT 1984 
' 


49 MODE 1:BORDER 1:INK 0,1:INK 1,26:INK 2,24:INK 3,6 

59 SPEED KEY 15,2 

60 ENV 1,1,18,09,11,09,10 

70 ENT 1,10,2,2 

80 ENV 3,1,9,16,5,-3,2 

909 ENV 2,5,3,3,1,-21,22,9,-3,2 

100 ENT -2,109,2,2,5,-7,1,2,11,3,2,-4,8 

110! 

120 

130 MOVE 30,32:DRAWR 0,400,1:MOVE 619,32:DRAWR 9,400,1 

1409 PEN 3:LOCATE 3,1:PRINT STRING$(36,143) 

150 PEN 2:LOCATE 3,2:PRINT STRING$(36,143) 

169 PEN 1:FOR r=5 TO 6:LOCATE 3,r:PRINT STRING$(36,143) 
:NEXT r 

170 bx=9 

189 lives=5:score=0 

199 PEN 1:GOSUB 680:CLEAR INPUT 

200 IF INKEY$<>CHR$(32) AND JOYC(D)<16 THEN 200 

-2109 LOCATE 11,23:PRINT SPACE$(20):LOCATE 1,24:PRINT SPA 


CE$(40); 
220 GOSUB 690:GOSUB 660:GOTO 280 
230" 
2540! 
2509 LOCATE bx,24:PRINT" ";STRING$(4,131);" ":RETURN 
260 ' 
270! 


280 xa=1:ya=1:IF INTC(RND*2)=1 THEN xa=-xa 
299 PEN 1:GOSUB 250 

300 ORIGIN 0,400 

319 x=bx+4:y=11:x1=x:y1=y 

320! 

330 

340 x1=x+xa:y1=y+ya 


continua sulla prossima pagina 
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350 IF x1=3 OR x1=38 THEN xa=-xa 

369 GOSUB 540 

370 IF y1=24 AND x1>bx+1 AND x1<bx+6 THEN ya=-ya:y1=y1- 
2:SO0UND 1309,44,8,7,1,1:a=((x>bx+5)OR(x<bx+2)):IF a= 
-1 THEN xa=xa*a:x1=x1+xa:y1=y1+1 i 

3809 IF y1=25 THEN LOCATE x,y:PRINT" ":GOTO 500 

399 GOSUB 250 

409 t=TEST((16%x1)-1,-(16*y1)-1) 

410 IF t<>9@ THEN ya=-ya:xz=x1:yz=y1:y1=y1+ya:GOSUB 590: 
IF t=2 THEN score=score+19:GOSUB 660 

420 IF t=3 THEN score=score+209:GOSUB 660 

439 IF t=1 THEN score=score+5:GOSUB 660 

450 IF y1=1 THEN ya=1 

459 LOCATE x,y:PRINT " ":LOCATE x1,y1:PRINT CHR$(233):x 
=x1:y=y1 

460 IF y=1 OR x=3 OR x=38 THEN SOUND 129,78,8,7,1,1 

470 GOTO 340 
' 


490! 

509 Llives=lives-1:SOUND 132,19,46,12,2,2:IF lives=0 THE 
N GOTO 620 

519 GOSUB 660:GOTO 280 
' 


530 ' 

540 IF CINKEY(8)=9 OR INKEY(74)=0) AND bx>2 THEN bx=bx- 
2:RETURN 

5509 IF CINKEY(1)=0 OR INKEY(75)=0@) AND bx<32 THEN bx=bx 
+2:RETURN 

569 RETURN 

570' 

580 ' 

599 LOCATE xz,yz:PRINT " ":RETURN 

600" 

610" 

629 IF score>=hiscore THEN hiscore=score 

6309 GOSUB 660:score=d:lives=5:GOT0 130 


650 ' 

669 SOUND 1309,09,29,13,3,9,31:LOCATE 1,25:PRINT TABC(4)"H 
ISCORE";hiscore; 

670 LOCATE 18,25:PRINT"SCORE";score:LOCATE 309,25:PRINT" 
LIVES";lives:RETURN 

6809 LOCATE 11,23:PRINT"PRESS SPACE TO START":RETURN 

6909 LOCATE 1,25:PRINT SPACE$C(40);:RETURN 
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Bomber 


Una 


10 
20 
30 
40 


50 
60 
70 


80 
90 


variazione di un tema classico! Un giocatore contro il computer. Solo tastiera. 


'BOMBER by DAVE TOWN 
‘copyright (c) AMSOFT 1984 
' 


MODE 1:CLS:INK 9,0:BORDER B:INK 1,18:INK 2,6:INK 3,4 
INK 5,15:INK 6,2:INK 7,24:INK 8,8:INK 9,26:INK 10,1 
Q:INK 11,20:INK 12,12:INK 13,16:INK 14,14:INK 15,21 
SYMBOL AFTER 240:SYMBOL 241,&409,&60,&70,&7F,&7F,&3F, 
&7,&0:SYMBOL 242,8&0,&32,&7A,&FE,&FA,&F2,&E0,80 


score=d:hiscore=fd:plane$=CHR$(241)+CHR$(242):x=2:y=2 
:drop=0:a=2:b=2 
GOSUB 480 
CLS 
PEN 2:LOCATE 1,15:INPUT"Enter skill : 9 CACE) to 5 ( 
NOVICE) : ",skill 

IF skill<9 OR skill>5 GOTO 90 

skill=skill+10 

LOCATE 1,15:PRINT CHR$(18);:LOCATE 1,15:INPUT"Enter 

speed A (FAST) to 100 (SLOW) : ",rate 

IF rate>1099 OR rate<0 GOTO 120 

' 

'Buildings 

Ù 

MODE 0O:FOR base=5 TO 15:FOR height=21 TO INTCRND(1) 
*8+skill) STEP -1:LOCATE base,height:PEN base-2:PRI 
NT CHR$(143)+CHR$(8)+CHR$(171)+CHR$(244);:NEXT :NEXT 
PLOT 0,20,4:DRAW 640,209,4 

LOCATE 1,25:PEN 2:PRINT"SCORE";score;:LOCATE 13,25: 
PRINT"HI";hiscore; 

Ul 

'Main Game 

' 

LOCATE x-1,y:PRINT" Mine 

PEN 1:LOCATE x,y:PRINT plane$;:PEN 2 

IF y=21 AND x=15 THEN GOTO 290:ELSE GOTO 340 

' 

‘Landed 

' 

FOR c=9 TO 1000:NEXT 


continua sulla prossima pagina 
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309 score=score+1009-(skill*2):skill=skill-1:x=2:y=2:a=2 
:b=2:drop=0 

310 IF skill<19 THEN skill=109:rate=rate-20 

320 IF rate<0 THEN rate=0 

339 GOTO 150 

3409 FOR c=09 TO rate:NEXT 

3509 x=x+1 

360 IF x=18 THEN LOCATE x-1,y:PRINT CHR$(18);:x=2:y=y+1 
:LOCATE x,y:PEN 1:PRINT plane$;:PEN 2 

370 a$=INKEY$:IF a$=" " AND drop=0 THEN drop=1:b=y+2:a= 


x 

380 IF y=21 THEN drop=0 

390 IF drop=1 THEN LOCATE a,b:PRINT CHR$(252);:LOCATE a 
sb-1:PRINT" ";:b=b+1:IF b>21 THEN LOCATE a,b:PRINT" 

";:LOCATE a,b-1:PRINT" ";:a=0:b=9:drop=09:SOUND 3,4 

009,19,12,09,9,109 

400 ga=(a-09.5)*32:9b=4009-(b*16):bomb=TEST(ga,gb) 

419 IF bomb>@ THEN GOTO 670 

420 gx=((x+1.5)*32):gy=498-(y*16):crash=TEST(gx,gy) 

439 IF crash>0@ GOTO 570 

449 GOTO 230 
' 


469 ‘Instructions 
' 


4809 LOCATE 1,2:PEN 1:PRINT"You are piloting an aircraft 
over a des-erted city and must clear the buildings 
in order to land and refuel. Your air- craft move 

s across the screen from left to right.";:PRINT 

499 PRINT:PRINT"On reaching the right, the aircraft 

returns to the left A LINE FURTHER DOWN.You have a 
n unlimited supply of bombs and you can.drop them 
on the buildings below by pressing the SPACE BAR. 
“";:PRINT 

50909 PRINT:PRINT"Each time you land, the height of the 

buildings or the speed of your aircraft increases. 
";:PRINT:PRINT:PRINT"ONCE YOU HAVE RELEASED A BOMB, 
YOU WILL NOT BE ABLE TO RELEASE ANOTHER UNTIL THE 


FIRST HAS EXPLODED !!!!"; 
510 PEN 2:LOCATE 1,24:PRINT:PRINT"Press any key to star 
tac 


520 a$=INKEY$:IF a$="" GOTO 520 
530 RETURN 

540" 

550 'Collision 


continua sulla prossima pagina 
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560 ' 

570 LOCATE x-1,y:PRINT CHR$(32)+CHR$(32)+CHR$(32)+CHR$( 
253)+CHR$(8)+CHR$(238)+CHR$(8); 

5809 FOR t=1 TO 19:SOUND 7,4000,5,15,0,0,5:PEN t:PRINT C 
HR$(253)+CHR$(8)+CHR$(238)+CHR$(8)+CHR$(32)+CHR$(8) 
z:FOR tm=0 TO 50:NEXT:NEXT:PEN 2 

599 CLS:LOCATE 1,5:PRINT"You scored";score; 

60909 IF score>hiscore THEN hiscore=score:LOCATE 1,8:PRIN 
T"TOP SCORE!!"; 

619 score=0d:LOCATE 1,12:PRINT"Press R to restart"; 

620 a$=INKEYS$:IF a$="r" OR a$="R" GOTO 6309 ELSE GOTO 62 
0 

639 PEN 1:MODE 1:x=2:y=2:a=2:b=2:G0T0 90 

6460 

659 'Bombed building 

660 ' 

6709 LOCATE a,b-1:PRINT" "+CHR$(8);:PEN 4:FOR tr=1 TO IN 
T(RND(1)*3)+1:score=score+5:SOUND 3,40999,109,12,09,0, 
19:LOCATE a,b:FOR t=0 TO 4:PRINT CHR$(253)+CHR$(8)+ 
CHR$(32)+CHR$(8);:NEXT:b=b+1 

689 IF b=24 THEN b=b-1 

690 NEXT 

709 LOCATE 6,25:PRINT score;:drop=0:a=x:b=y:GOT0 230 
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Telly tennis 


Semplice ma di gran divertimento! Per due giocatori o un giocatore contro il computer. 
Tastiera o 1 o 2 Joystick. 


10 
20 
30 
40 
50 
60 
70 
80 
90 
100 
110 
120 
130 
140 
150 
160 
170 
180 
190 


200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 


320 
330 
340 
350 
360 


'TELLY TENNIS by DAVID RADISIC 
‘copyright (c) AMSOFT 1985 

' 

DEFINT a-z 

comp=1 

ENV 1,=11,29,=9,5000 


MODE 1:INK 9,19:BORDER 109:INK 1,26:INK 2,18:INK 3,0 
GOSUB 710 
GOSUB 150 

GOSUB 330 

GOSUB 420 

LOCATE 13,1:PRINT USING"#### ";score1; 

LOCATE 35,1:PRINT USING"#### ";score2; 

GOTO 100 

PEN 2 

x(1)=3:y(1)=5 

x(2)=37:y(2)=22 
edge$=CHR$(233):edge2$=STRING$(2,207) 

LOCATE 1,3:PRINT STRING$(39,edge$):PRINT STRING$(39 
,edge$) 

FOR i=1 TO 19 

PRINT edge2$;TAB(38);edge2$ 

NEXT 

PRINT STRING$(39,edge$):PRINT STRING$(39,edge$); 
WINDOW #1,3,37,5,23 

CLS#1 

SYMBOL 2409,09,609,126,126,126,126,609,0 
bat$="1"+CHR$(8)+CHR$(10)+"1|" 

clr$=" "+CHR$(8)+CHR$(10)+" " 

ball$=CHR$(240) 

PEN 3 : 

LOCATE 2,1:PRINT"Player 1: 0";:LOCATE 24,1:PRIN 
T"Player 2: 0"; 

RETURN 

n=INTC(RND*2):CLS #1:scored=0 

PEN 3 

FOR i=1 TO 2:LOCATE xCi),y(i):PRINT bat$;:NEXT 
ON n GOTO 390 


continua sulla prossima pagina 
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7450 


xb=21:dx=1 

GOTO 4000 
xb=19:dx=-1 
yb=12:dy=INTC(RND*3)-1 
RETURN 


GOSUB 600 


oxb=xb:0yb=yb 

GOSUB 500 

IF note>0 THEN SOUND 129,note,509,15,1 
LOCATE oxb,oyb:PRINT" "; 

LOCATE xb,yb:PRINT ball$ 

IF scored=9 THEN 420 


RETURN 

LOCATE xb+tdx,yb+tdy:ch$=COPYCHR$C(#09) 

note=0 

IF ch$=" " THEN xb=xb+dx:yb=yb+dy:RETURN 

IF ch$="1" THEN dx=2-dx-2:dy=INT(RND*3)-1:note=200: 
RETURN 


IF ch$=LEFT$(edge2$,1) THEN 570 
IF ch$=edge$ THEN dy=2-dy-2:note=250 
RETURN 


IF dx>9 THEN scorel=score1+1 ELSE score2=score2+1 


scored=1:note=2000 

RETURN > 
p(1)=(INKEY(69)>=09)+(INKEY(72)>=9)+ABS(C(INKEY(71)>= 
0)+C(INKEY(73)>=0))*2 

IF comp=1 THEN p(2)=ABS(y(2)<yb)*2+(y(2)>yb):GOTO 6 
30 
p(2)=C(INKEY(4)>=9)+C(INKEY(48)>=B)+ABS(CINKEY(5)>=0) 
+(INKEY(49)>=0))*2 

PEN 3 

FOR i=1 TO 2 

LOCATE xC(i),y(i)+pC(i):ch$=COPYCHR$(#09) 

IF ch$=" " THEN LOCATE xCi),yC(i):PRINT clr$;:yC(i)=y 
(i)+ROUND(p(i)/2) 

LOCATE xCi),yC(i):PRINT bat$; 

NEXT 

PEN 1 

RETURN 

PEN 2:PRINT:PRINT TAB(15)"Ping-Pong":PRINT TAB(15)" 


PEN 3:PRINT:PRINT TAB(14)"TFo move bats : 
PRINT:PRINT:PEN 1 
PRINT" Player 1 Player 2 Direction":PRI 


NT ; : i 
continua sulla prossima pagina 
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830 


PRINT" A 6 UP" 
PRINT" rÀ 3 DOWN" :PRINT 


PEN 3:PRINT:PRINT TAB(14)"Or joysticks" 


PRINT:PRINT:PRINT:PRINT 

PEN 2 

PRINT TABC6) "Select <1> or <2> players" 
i$=INKEY$S:IF i$<>"1" AND i$<>"2" THEN 810 
IF i$="1" THEN comp=1 ELSE comp=0 

MODE 1:RETURN 
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Electric fencing 


Si provi a battere l’avversario! Solo per due giocatori. Tastiera o Joystick. 


109 'ELECTRIC FENCING by ALEXANDER MARTIN 
20 'copyright (c) AMSOFT 1985 
' 


40 DEFINT a-z 
50 MODE 0 

609 GOSUB 980 
70 GOSUB 1370 
89 GOSUB 270 
909 GOSUB 1520 
199 GOSUB 1370 
119 GOSUB 1270 

U 


130! 
1409 REM start 
159 IF finished THEN GOTO 100 
1609 GOSUB 240 
170 FRAME:IF pidir THEN GOSUB 570 ELSE FRAME:FRAME 
189 FRAME:IF p2dir THEN GOSUB 620 ELSE FRAME:FRAME 
190 IF p1sa=-1 THEN GOSUB 670 
200 IF p2sa=-1 THEN GOSUB 720 
219 GOTO 140 
' 


230 ' 
240 IF j THEN 380 ELSE 480 
' 


260! 
270 CLS:PEN 6 
280 PRINT:PRINT" CHOOSE CONTROL" 
290 PRINT:PRINT:PRINT:PRINT"press J/K then ENTER" 
300 LOCATE 4,10:PRINT"JOYSTICK";TAB(5);"OR KEYS" 
310 LOCATE 12,10:IF j THEN PRINT"*":ELSE PRINT" " 
320 LOCATE 12,11:IF j THEN PRINT" ":ELSE PRINT"*" 
330 IF NOTCINKEY(45)) THEN j=-1 
340 IF NOTCINKEY(37)) THEN j=0 
350 IF NOTCINKEY(18)) THEN RETURN ELSE 310 

' 


370 ' 
389 p1=JO0Y(0):p2=J0Y(1) 
390 pidir=(p1 AND 1)*-1+(p1 AND 2)*@.5 
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499 p2dir=(p2 AND 1)*-1+(p2 AND 2)*0.5 
410 IF P1 AND 16 THEN pI1sa=p1sa-1:IF p1sa=-1 THEN AFTER 
15 GOSUB 770 

420 IF P2 AND 16 THEN p2sa=p2sa-1:IF p2sa=-1 THEN AFTER 
15 GOSUB 770 

4309 IF pisa THEN pidir=0 

440 IF p2sa THEN p2dir=0 

450 RETURN 

460 

470! 

489 p2dir=(C(INKEY(4)=9)*1)+(C(INKEY(5)=0)*-1) 

499 pidir=(CINKEY(69)=B)*1)+(C(INKEY(71)=0)*-1) 

500 IF INKEY(63)=0 THEN p'1sa=p1sa-1:IF p1sa=-1 THEN AFT 
ER 15 GOSUB 770 

510 IF INKEY(10)=0 THEN p2sa=p2sa-1:IF p2sa=-1 THEN AFT 
ER 15 GOSUB 770 

520 IF pisa THEN pIidir=0 

539 IF p2sa THEN p2dir=0 

540 RETURN 
' 


560 ' 

570 pt=p1wp+pldir:IF pt>25 OR pt<6 THEN RETURN ELSE pw 
p=pt 

580 pidir=0 

5909 PEN 1:LOCATE 3,p'1wp:CLS #3:PRINT CHR$(2099);:RETURN 

600" 

610 

620 pt=p2wp+p2dir:IF pt>25 OR pt<6 THEN RETURN ELSE p2w 
p=pt 

6309 p2dir=0 

640 PEN 2:LOCATE 18,p2wp:CLS #5:PRINT CHR$(211);:RETURN 
' 


660 ' 

670 PAPER #4,4:WINDOW #4,4,17,p'lwp,plwp:CLS#4:FRAME:FRA 
ME 

689 PAPER #4,09:CLS#4 

699 GOTO 570 
' 


710' 

720 PAPER #6,5:WINDOW #6,4,17,p2wp,p2wp:CLS#6:FRAME:FRA 
ME 

730 PAPER #6,0:CLS#6 

7450 GOTO 620 

750 
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880 


890 


1000 
1010 
1020 
1939 
1040 
1950 
1960 
1070 
1980 
1090 
1100 
1110 


1120 
1130 


pwpe=(p1wp=p2wp):IF p1sa AND NOTC(p2sa) AND pwpe THE 
N p1sc=p1sc+1:SOUND 132,1209,19,09,1,0:PRINT#1,a$(p1s 
C);:IF p1sc=9 THEN 860 

IF p2sa AND NOT(pIsa) AND pwpe THEN p2sc=p2sc+1:SOU 
ND 132,1090,109,09,1,0:PRINT#2,a$(p2sc);:IF p2sc=9 THE 
N 860 

IF pisa THEN SOUND 132,409,709,09,1,1 

IF p2sa THEN SOUND 132,56,70,09,1,1 

p1sa=0 

p2sa=0 

RETURN 


PEN 6 

LOCATE 6,10:PRINT"GAME OVER" 

IF p1sc=9 THEN INK 1,2,20:INK 2,09 ELSE INK 2,6,17:I 
NK 1,0 

SOUND 129,1000,0,12,3:SOUND 130,90909,9,12,3 
WHILE INKEY$<>"":WEND 

t!=TIME:WHILE t!+2000>TIME:WEND 

WHILE INKEY$="":WEND 

CLS 

finished=-1 

RETURN 


a$(0)="111101101101111" 
a$(1)="0901001001001001" 
a$(2)="111001111100111" 
a$(3)="111001111001111" 
a$(4)="1001001011110901" 
a$(5)="1111090111001111" 
a$(6)="111190111101111" 
a$(7)="111001001010010" 
a$(8)="111191111101111" 
a$(9)="111101111001001" 

FOR n=0 T0 9 

howlong=LENC(a$(n)) 

FOR n2=1 TO howlong 

IF MID$(a$(n),n2,1)="1"THEN MID$(a$(n),n2,1)=CHR$( 
143)ELSE M1D$(a$(n),n2,1)=CHR$(32) 
NEXT n2,n 
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1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 


1240 
1250 
1260 
1270 


1280 
1290 


1300 


1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 


b$="ELECTRIC FENCING" 

c$=CHR$(32)+CHR$(164)+" Alexander Martin" 

ENV 1,=9,2000:ENT -1,6,3,1 

ENV 2,127,9,0,127,9,9,127,9,09,127,9,09,127,0,0 
ENV 3,=9,9000 

1 


BORDER 0 

INK 09,12:PEN #4,1:PEN #6,2:PEN #1,1:PEN #2,2:PAPER 
#1,3:PAPER #2,3:PEN #09,6 

RETURN 'FROM SETTING UP CONSTANTS 

' 


INK 0,12:INK 1,2:INK 2,6:INK 3,13:INK 4,20:INK 5,1 
7:INK 6,209 

WINDOW #3,3,3,6,25:WINDOW #5,18,18,6,25 

WINDOW #1,3,5,1,5:WINDOW #2,16,18,1,5:WINDOW #7,1, 
20,1,5:PAPER #7,3 
CLS:CLS#7:PRINT#1,a$(0d);:PRINT#2,a$(0d);:p1sc=0:p2s 
c=09:p1wp=5:p2wp=24:pI1dir=1:p2dir=1 

GOSUB 5709:GOSUB 620 

SOUND 1,19099,09,12,2:SOUND 2,90909,9,12,2 


p1sa=0:p2sa=0:finished=0 

RETURN "FROM GAME SHEET RESTORE 
' 

' 

CLS 

PEN 7 

FOR n=1 TO LENC(b$) 


LOCATE 2+n,10 

FOR n2=LEN(b$) TO n STEP-1 

PRINT MID$(b$,n2,1) 

LOCATE 2+n,190 

SOUND 135,209*n2,5,12,2,1 

NEXT n2,n 

SOUND 135,1009,9,13,3,1,20 

PEN 6:PRINT:PRINT:PRINT:PRINT c$ 
FOR n=1 TO 5000:NEXT 

RETURN 


IF j THEN RETURN 
CLS 
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1540 LOCATE 7,5 
1559 PRINT'"CONTROLS" 


1569 PRINT 
1579 PRINT" PLAYER1 PLAYER2" 
1589 PRINT 
1599 PRINT" A Up 6" 
16009 PRINT" Z down 3" 
1619 PRINT" X fire 7" 


1620 t!=TIME:WHILE t!+1000>TIME:WEND 
1630 RETURN 
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Amthello 


Il gioco delle persone che vogliono riflettere. Bisogna cercare di circondare e catturare 
l’avversario senza lasciarsi catturare! Per un giocatore contro il computer. Solo tastiera. 


109 'AMTHELLO by M.J.GRIBBINS 
209 'copyright (Cc) AMSOFT 1984 
' 


49 BORDER 14 

509 CLEAR 

60 MODE 1:PEN @:PAPER 1:CLS 

70 INK O,0:INK 1,14:INK 2,18:INK 3,26 

89 LOCATE 2,3:PEN 3:PRINT"A":LOCATE 3,4:PRINT"M":LOCATE 
4 ,5:PRINT"T":LOCATE 5,6:PRINT"H" 

909 LOCATE 6,7:PRINT"E":LOCATE 7,8:PRINT"L":LOCATE 8,9:P 
RINT"L":LOCATE 9,10:PRINT"O" 

100 WINDOW #1,2,39,22,25:PAPER #1,1:PEN #1,0:CLS #1 

119 PEN @ 

120 LOCATE #1,8,1:PRINT #1, "BLACK ALWAYS PLAYS FIRST" 

139 LOCATE #1,1,3:PRINT #1, "PRESS B OR W TO CHOOSE BLAC 
K OR WHITE" 

140 B$=INKEY$:IF B$="" THEN 140 

150 IF B$="W" OR. B$="w" THEN Q%=3:N%=9:GOTO 210 

160 IF B$="B" OR B$="b" THEN Q%=0:N%=3:G0T0 210 

170 CLS #1:LOCATE #1,4,3 

189 PRINT #1," BLACK OR WHITE ONLY" 

199 FOR T=0 TO 1000:NEXT T 

200 GOTO 140 

210 DIM CX(10,10),P%(9,9),C1%(8),C2%(8),CXXC9),CYX(9) 

220 11%=2:41%=2:12%=7:42%=7 

230 FOR I%=09 T0 9 

240 CX(I%,0%)=6:C%(0,1%)=6 

250 C%(9,1%)=6:C%(1%,9)=6 

269 NEXT I% 

270 FOR I%=1 TO 8 

280 READ C1%(I%),C2%(1%) 

290 FOR J%= 1 TO 8 

300 READ PX(I%,4%) 

310 CXCI%,4%)=6 

320 NEXT JZ:NEXT 1% 

330 CX(4,4)=3:C%(4,5)=0:C%(5,4)=0:C%(5,5)=3 
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400 
410 
420 


430 
450 
450 


460 
470 
480 


490 


500 
510 


520 
530 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
670 
680 
690 
700 
710 
720 


FOR K%=1 TO 58 


- READ AR%,BR%,CR%,DR% 


PLOT ARZ,BRZ:DRAW CR%X,DR%,0 

NEXT K% 

GOSUB 1460 

IF Q%=3 GOTO 770 

CLS #1:INPUT #1," WHICH LINE DO YOU WANT ";E% 

IF E% <1 OR E% >8 GOTO 400 

LOCATE #1,1,3:INPUT #1, "WHICH COLUMN DO YOU WANT "; 
D% ì 

IF DX <1 OR D% >8 GOTO 420 

IF C%(D%,E%)=6 GOTO 480 

CLS #1:LOCATE #1,5,2:PRINT #1,"THAT SQUARE IS ALREA 
DY OCCUPIED !" 

FOR T=1 TO 1000:NEXT T 

GOTO 400 

PLOT 270+(39*D%),70+(39*E%):DRAW 290+(30*D%),89+(30 
*E%),0% 

PLOT 290+(30*D%),70+(30*E%):DRAW 270+(309*D%),89+(30 
*E%) ,0% i 

GOTO 540 

FOR M%= 9 TO 19 STEP 2:PLOT 270+(30*D%),70+M%+(30*E 
4) 

DRAW 290+(30*D%) ,70+M%+(30*E%) ,6:NEXT M% 

GOTO 400 

VRX%=0 

FOR K%=1 TO 8 

VRX=0:C3%=D%:C4%=E% 

C3%=C3%+C1%(K%):C4%=C4%+C2%(K%) 

IF C%X(C3%,C4%)=N% GOTO 590 ELSE 600 

VRX=VR%+1:GOTO 570 

IF C%X(C3%,C4%)=6 GOTO 610 ELSE 620 

NEXT KZ:GO0OTO 678 

IF VRX=09 GOTO 610 ELSE 630 

VRXX=VRX%+VR% 

C3%=C3%-C1%(K%):C4%=C4%-C2%(K%) 

IF CX(C3%,C4%)=6 GOTO 610 ELSE 660 
CX(C3%,C4%)=Q%:G0T0 640 

IF VRX%=9 GOTO 680 ELSE 710 

CLS #1:PRINT #1," THIS IS NOT A POSSIBLE CHOICE" 
FOR T=1 TO 1000:NEXT T 

GOTO 510 

E%=E%:D%X=D%: VRX%=VRX% 

CLS #1:PRINT #1,"YOU HAVE PLAYED LINE NUMBER ";E% 
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880 


920 
930 


970 
980 


1000 
1010 
1920 
1930 
1040 
1950 
10960 
1070 
1080 
1090 
1100 
1110 
1120 


PRINT #1," AND COLUMN NUMBER ";D% 

LOCATE #1,2,4:PRINT #1,"THAT GIVES YOU ";VRX%;" SQU 
ARES(S)" 

C%X(D%,E%)=Q%:GOSUB 1770 

GOSUB 1460 

CLS #1:LOCATE #1,109,2:PRINT #1,"NOW IT'S MY TURN .. 


P%=0:VRX%=0:VRY%=0 


IF 11%%J1%=1 AND I2%*J2%=64 GOTO 860 


FOR K%=2 TO 7 
IF CX(2,K%) <> 
IF CXC(7,K%) <> 
IF CXCKZ%,2) <> 
IF CXC(K%,7) <> 
NEXT K% 

FOR I%=17% TO I2% 

FOR J%=J1% TO. 42% 

IF CX(I%,4%)=6 GOTO 1930 

NEXT JZX:NEXT I% 

IF P% > 0 GOTO 1000 

IF PAS%=1 GOTO 920 ELSE 940 

CLS #1:PRINT #1," DEADLOCK ! I MUST PASS ALSO.GAME 
OVER" 

FOR T=1 TO 1000:NEXT T:GOTO 1550 

CLS #1:LOCATE #1,18,2:PRINT #1,"I MUST PASS" 

GOSUB 2720 

IF PAS%=1 GOTO 970 ELSE 990 

CLS #1:PRINT #1,"DEADLOCK! YOU MUST PASS ALSO.GAME 
OVER" 

FOR T=1 TO 1000:NEXT T:GOTO 1550 

GOTO 400 


THEN 1I1%=1 
THEN I2%4=8 
THEN J1%=1 
THEN J42%=8 


o o S SA 


IF LC%=0 THEN LC%=1:RANDOMIZE LC%X:RL%X=RND(LC%) 
CX1%=CX%(RL%):CX2%=CYZ(RL%) 

GOTO 1220 

VRX%=0 


FOR KZ%=1 TO 8 

VRX=09:C3%=1%:C4%=J4% 
C3%=C3%+C1%(K%)=C4%=C4%+C2%(K%) 

IF C%(C3%,C4%)=Q% GOTO 1980 ELSE 1090 
VR%=VR%+1:GOTO 10960 

IF C%X(C3%,C4%)=6 GOTO 11009 ELSE 1110 
NEXT KZ%:GO0T0 17139 

IF VR%=0% GOTO 11090 ELSE 1120 
VRXZ=VRX%+VRZ%:GOTO 1100 
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IF VRX%=9 GOTO 890 

IF P%(I%,4%) < P% GOTO 890 

IF P%(I%,4%) > P% GOTO 1160 ELSE 1170 
PY=P%(I%,4%):VRYX=VRX%:LC%=B:CX%(B)=I%:CY%(0)=J%:6 
OTO 890 

IF VRY% > VRX% GOTO 890 

IF VRYX < VRX% GOTO 1190 ELSE 1200 
LCX=0:VRYX=VRX%:CX%(0)=I%:CY%(d)=J%:GOTO 890 
LCX=LC%+1:CXX(LC%)=IX:CYX(LCX)=J4% 

GOTO 890 

CX2%=CX2%:CX1%=CX1%:VRY%=VRY% 

CLS #1:PRINT #1," I CHOOSE LINE NUMBER ";CX2% 
PRINT #1," AND COLUMN NUMBER ";CX1% 

LOCATE #1,1,4:PRINT #1, "THAT GIVES ME ";VRY%;" SQU 
ARE(S)" 

PLOT 270+(30*CX1%),70+(30*CX2%):DRAW 290+(39*CX1%) 
,89+(30*CX2%),N% 

PLOT 290+(30*CX1%),70+(30*CX2%):DRAW 270+(30*CX1%) 
,89+(309*CX2%) ,N% 

FOR T=1 TO 1000:NEXT T 

FOR K%=1 TO 8 

VRX=0:C3%=CX1%:C4%=CX2% 
C3%=C3%+C1%(K%):C4%=C4%+C2%(K%) 

IF C%(C3%,C4%)=Q% GOTO 1330 ELSE 1340 
VRX=VR%+1:GOTO 1310 

IF C%(C3%,C4%)=6 GOTO 13509 ELSE 1360 

NEXT K%:GOTO 1400 

IF VR%=0 GOTO 1350 

C3%=C3%-C1%(K%):C4%=C4%-C2%(K%) 

IF C%(C3%,C4%)=6 GOTO 1350 

C%(C3%,C4%)=N%:GOTO 1370 

CX(CX1%,CX2%)=N% 

GOSUB 2720 

GOSUB 1460 

IF PAS%=1 GOTO 1440 ELSE 1450 

CLS #1:PRINT #1," YOU MUST PASS":FOR T=1 TO 10 
BO:NEXT T:GOTO 770 

GOTO 400 

FOR I%=1 TO 8 

FOR J%=1 TO 8 

FOR M%=9 TO 19 STEP 2 
2%=270+(30%*1%):H%=70+(30*J%):W%=H%+M% 

PLOT Z%,W%: DRAW Z%+20,W%,C%(1%,4%) 

NEXT M%:NEXT JX:NEXT 1% 
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XK=X%+1 

IF X%=61 GOTO 1550 
RETURN 

CQ%=09:CN%=0 


FOR 1I%=1 TO 8 

FOR J%=1 TO 8 

IF C%X(IX,4%)=Q% THEN CQ%=CQ%+1 

IF C%X(I%X,4%)=N% THEN CNZ=CN%+1 

NEXT JZ:NEXT I% 

IF CQ% > CNZ GOTO 1680 

IF CQ%X=CN% GOTO 1630 ELSE 1650 

CLS #1:LOCATE #1,25,2:PRINT #1, "DEADLOCK" 


- END 


CLS #1:LOCATE #1,5,1:PRINT #1, "YOU HAVE ";CQ%;" SQ 
UARES;I HAVE ";CN% 

LOCATE #1,11,3:PRINT #1,"I HAVE WON... 1!!!" 

END 

CLS #1:LOCATE #1,5,1:PRINT #1, "YOU HAVE ";CQ%;" Sa 
UARES;I HAVE ";CN% 

LOCATE #1,5,3:PRINT #1,"WELL DONE. YOU HAVE WON !! 


END 
IF C%(2,2)=Q% AND (C%(3,1)=N% OR C%(1,3)=N%) GOTO 
1720 ELSE 1730 


. PX(3,1)=1:P%(1,3)=1 


IF C%(7,7)=Q% AND (C%(8,6)=N% OR C%(6,8)=N%) GOTO 
1740 ELSE 1750 

P%(8,6)=1:P%(6,8)=1 

IF C%(2,7)=Q% AND (C%(1,6)=N% OR C%(3,8)=N%) GOTO 
1760 ELSE 1770 

PX(1,6)=1:P%(3,8)=1 

IF C%(7,2)=@% AND (C%(6,1)=N% OR C%(8,3)=N%) GOTO 
17809 ELSE 1790 

P%(6,1)=1:P%(8,3)=1 

IF D%=1 OR D%=8 OR E%=1 OR E%=8 GOTO 1820 

IF CX1%=1 OR CX1%=8 OR CX2%=1 OR CX2%=8 GOTO 1820 
RETURN 

FOR JX=1 TO 8 STEP 7 

FOR I%=2 TO 7 

IF CX(IX,J4%)=N% GOTO 18509 ELSE 1860 
PX(I%+1,4%)=21:P%(I%-1,4%)=21 

IF C%(J4%,I1%)=N% GOTO 1870 ELSE 1880 
P%(I4%,1%+1)=21:P%(4%,1%-1)=21 

NEXT I% 
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1890 FOR I%=2 TO 7 

1900 IF CX(I%,J4%)=Q% GOTO 1910 ELSE 1920 

19109 PX(I%+1,4%)=2:P%(I%-1,4%)=2 

1920 IF C%(J4%,I%)=Q% GOTO 1930 ELSE 1940 

19309 PX(J4%,1%+1)=2:P%(J4%,1%-1)=2 

1940 NEXT IZ:NEXT 4% 

1950 PX(1,2)=1:P%(1,7)=1:P%(2,1)=1:P%(7,1)=1 

1960 P%(2,8)=1:P%(7,8)=1:PZ(8,2)=1:P%(8,7)=1 

1970 FOR I%=2 TO 7 

1980 IF C%(1,1%-1)=Q% AND C%(1,1%+1)=Q% THEN P%(1,1I%)=2 


5 

1990 IF C%X(8,1%-1)=Q% AND C%(8,1%+1)=Q% THEN P%(8,I%)=2 
5 i 

2000 IF CX(I%-1,1)=Q% AND C%(I%+1,1)=Q% THEN P%(I%,1)=2 
5 

2019 IF CX(I%-1,8)=Q% AND C%(I%+1,8)=Q% THEN P%(I%,8)=2 
5 


2020 NEXT I% 

2030 FOR J%=1 TO 8 STEP 7 

2040 FOR I%=4 TO 8 

2050 IF CX(4%,I%) <> N% GOTO 2140 

2060 IC%X=I%X-1:IF C%(I4%,IC%)=6 GOTO 2140 
2070 IF CX(I4%,IC%)=Q% GOTO 2080 ELSE 2090 
2080 ICX=IC%-1:G0T0 2070 

2090 IF CX(J4%,IC%)=6 GOTO 2110 

2100 GOTO 2140 

2110 IF IC%=0 GOTO 2140 

2120 IF CX(J4%,I%+1)=Q% AND C%(I4%,1C%-1)=6 GOTO 2140 
2130 PZ(J4%,1IC%)=26 

2140 IF CXC(I%,4%) <> N% GOTO 2230 

2150 IC%=I%-1:1IF C%C(IC%X,4%)=6 GOTO 22309 
2160 IF C%X(IC%X,4%)=Q% GOTO 2170 ELSE 2180 
2170 IC%=IC%-1:G0T0 2160 

2189 IF C%C(IC%X,4%)=6 GOTO 2200 

2190 GOTO 2230 

2200 IF IC%=0 GOTO 2230 

2210 IF CX(I%X+1,J4%)=Q% AND C%C(IC%-1,4%)=6 GOTO 2230 
2220 P4X(IC%,4%)=26 

22309 NEXT I% 

2240 FOR I%=1 TO 5 

2250 IF CX(4%,I%) <> N% GOTO 2340 

2260 IC%X=I%+1:IF CX(I4%,IC%)=6 GOTO 2340 
2270 IF CX(I4%,IC%)=Q% GOTO 22809 ELSE 2290 
2280 IC%=IC%+1:G0T0 22709 


continua sulla prossima pagina 


Alcuni programmi... Appendice 3 Pagina 19 


2290 
23500 
2310 
2320 
2330 
23450 
2350 
2360 
2370 
2380 
2390 
2400 
24710 
2420 
2430 
24540 
2450 
2460 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 


IF C%(4%,IC%)=6 GOTO 2310 

GOTO 2340 

IF IC%=9 GOTO 2340 

IF C%(4%,1%-1)=Q% AND C%(4%,IC%+1)=6 GOTO 2340 
P%(4%,1C%)=26 

IF C%(I%,J%) <> N% GOTO 2430 

ICX=1%+1:IF C%(IC%,4%)=6 GOTO 2430 

IF C%XC(IC%,4%)=@Q% GOTO 2370 ELSE 2380 
IC%=IC%+1:GOTO 2360 

IF C%XC(IC%,4%)=6 GOTO 2400 

GOTO 2439000 

IF IC%=9 GOTO 2430 

IF C%(I%-1,4%)=Q% AND C%C(IC%+1,J%)=6 GOTO 2430 
PX(IC%,4%)=26 

NEXT IZ:NEXT J4% 

IF C%(1,1)=N% GOTO 2450 ELSE 2468 

FOR I%=2 TO 6:P%(1,1%)=20:P%(I%,1)=20:NEXT 1% 
IF C%(1,8)=N% GOTO 2470 ELSE 2480 

FOR I%=2 TO 6:P%(I%,8)=20:P%(1,9-1%)=20:NEXT I% 
IF C%(8,1)=N% GOTO 2490 ELSE 2500 

FOR I%=2 TO 6:P%(9-1%,1)=20:P%(8,1%)=20:NEXT I% 
IF C%(8,8)=N% GOTO 2510 ELSE 2520 

FOR I%=3 TO 7:P%(I%,8)=20:P%(8,1%)=20:NEXT 1% 
IF C%(1,1) <> 6 THEN P%(2,2)=5 

IF C%(1,8) <> 6 THEN P%(2,7)=5 

IF C%(8,1) <> 6 THEN P%(7,2)=5 

IF C%(8,8) <> 6 THEN P%(7,7)=5 
P%(1,1)=30:PZ(1,8)=30:P%(8,1)=30:P%(8,8)=30 
FOR I%=3 TO 6 


2580 IF C%(1,I%)=N% THEN P%(2,1%)=4 


2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 


2670 


IF C%(8,1I%)=N% THEN P%(7,1%)=4 

IF C%(I%,1)=N% THEN P%(I%,2)=4 

IF C%(I%,8)=N% THEN P%(I%,7)=4 

NEXT 1% 

IF C%(7,1)=Q% AND C%(4,1)=N% AND C%(6,1)=6 AND C%( 
5,1)=6 THEN P%(6,1)=26 

IF C%(1,7)=Q% AND C%(1,4)=N% AND C%(1,6)=6 AND C%( 
1,5)=6 THEN P%(1,6)=26 

IF C%(2,1)=Q% AND C%(5,1)=N% AND C%(3,1)=6 AND C%( 
4,1)=6 THEN PZ(3,1)=26 

IF C%(1,2)=@Q% AND C%(1,5)=N% AND C%(1,3)=6 AND CX 
1,4)=6 THEN P%(1,3)=26 

IF C%(8,2)=Q% AND C%(8,5)=N% AND C%(8,3)=6 AND CX 
8,4)=6 THEN P%(8,3)=26 
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2680 IF C%(2,8)=Q% AND C%(5,8)=N% AND C%(3,8)=6 AND C%( 
4,8)=6 THEN P%(3,8)=26 

2690 IF C%(8,7)=Q% AND C%(8,4)=N% AND C%(8,5)=6 AND C%( 
8,6)=6 THEN P%(8,6)=26 

2700 IF C%(7,8)=Q% AND C%(4,8)=N% AND C%(5,8)=6 AND C%( 
6,8)=6 THEN P%(6,8)=26 

2710 RETURN 

2720 PAS%=0 

2730 FOR IZ=1 TO 8 

2740 FOR J%=1 TO 8 

2750 IF C%(I%,4%)=Q% GOTO 2780 

2760 NEXT JX:NEXT I% 

2770 PAS%=1:RETURN 

2780 FOR K%=1 TO 8 

2790 VR%=0:C3%=1I%:C4%=J4% 

2800 C3%=C3%+C1%(K%):C4%=C4%+C2%(K%) 

28109 IF C3% < 1 OR C3% > 8 GOTO 2820 ELSE 2830 

28209 NEXT K%:GOTO 2760 

28309 IF C4% < 1 OR C4% > 8 GOTO 2820 ELSE 2840 

2840 IF C%(C3%,C4%)=N% GOTO 2850 ELSE 2860 

2850 VR%=VR%+1:G0T0 2800 è 

2860 IF C%X(C3%,C4%)=Q% GOTO 2820 ELSE 2870 

2870 IF VR% > 0 THEN RETURN 

2889 GOTO 2820 

2890 DATA 1,09,309,1,20,19,109,29,1,30,1,1,1,1,3 

2900 DATA 3,3,3,1,1,09,1,20,3,5,5,5,5,3,20,-1,1,19,3,5 

2910 DATA 0,09,5,3,19,-1,0,19,3,5,0,0,5,3,10,-1 

2920 DATA -1,20,3,5,5,5,5,3,20,0,-1,1,1,3,3,3,3,1,1,1,- 
1,30,1,20,10,19,20,1,30 

2930 DATA 263,100,263,120,270,130,255,130,255,1309,255,1 
40,255,140,270,140 

2940 DATA 270,140,270,1509,270,1509,255,150,255,160,270,1 
60,270,160,270,180 

2950 DATA 2709,180,255,1809,270,170,255,170,270,190,270,2 
10,270,200,255,200 

2960 DATA 255,200,255,210,255,220,270,220,270,220,270,2 
30,270,230,255,230 

2970 DATA 255,230,255,249,255,240,270,240,255,250,270,2 
50,270,250,2709,260 

2980 DATA 270}260,255,260,255,250,255,270,270,280,270,3 
00,270,300,255,300 

2990 DATA 255,310,255,330,255,330,270,330,270,330,270,3 
10,270,3109,255,310 

3000 DATA 255,320,270,320 
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3010 


3020 


3030 


3040 


3050 


3060 


3070 


3080 


DATA 510,355 ,310,3/5,330,359,335,3933353,333,393,3 
65,335,365,350,365 

DATA 350,365,350,375,350,375,335,375,365,355,380,3 
55,380,355,380,375 

DATA 380,375,365,375,380,365,365,365,410,355,410,3 
75,4109,365,395,365 

DATA 395,365,395,375,425,355,4450,355,440,355,440,3 
65,4409,365,425,365 

DATA 425,365,425,375,425,375,4540,375,455,375,455,3 
55,455,355,470,355 

DATA 470,355,470,365,470,365,455,365,485,375,500,3 
75,500,375,500,355 

DATA (515,3 5,919,3992135.99d 330,393, 230,335,330,3 
75,530,375,515,375 

DATA 515,365,5309,365 
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Raffles 


Si irrompe nella casa di Sua Signoria per rubare il tesoro. Molti ostacoli sbarreranno il 
cammino, luci da accendere, il cane da guardia! Per un giocatore contro il computer. 
Tastiera o Joystick. 


10 
20 


‘RAFFLES by DAVID RADISIC 
‘copyright (c) AMSOFT 1985 
' 


MODE A:INK 9,09:BORDER A:INK 1,26:INK 2,15:INK 3,25 
INK 4,14:INK 5,24,12:INK 6,0:INK 7,0:INK 8,0:PAPER # 
1,7 
delay=200 
DIM objx(5,209),0bjy(5,209),gemx(5,29),gemy(5,20) 
GOSUB 380 
GOSUB 720 

pause=2099:GOSUB 340 

IF gems=9 THEN GOSUB 970 

PEN 4 


FOR i=10 TO 12 

LOCATE 15,i:PRINT"SWAG"; 
NEXT 

PAPER B:CLS#2:PAPER 8 
GOSUB 1170 

GOSUB 1230 

GOSUB 1370 

GOSUB 1510 

IF rm=09 THEN GOSUB 1900 
IF dead=09 THEN 160 
pause=1009:GOSUB 340 


PAPER OQ:CLS:PEN 1 

LOCATE 4,3:PRINT"Do you want"; 
LOCATE 4,5:PRINT"Another game"; 
PEN 5:LOCATE 9,7:PRINT"Y/N"; 
i$=UPPER$CINKEY$):IF i$<>"Y" AND i$<>"N" THEN 280 
IF i$="N" THEN MODE 2:PEN 1:STOP 
RUN 

IF dog=1 THEN RETURN 
dog=1:dogx=minx(rm):dogy=miny(rm) 
RETURN 

FOR loop=1 TO pause 

FRAME 

NEXT 


RETURN ; ; E 
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550 
570 
580 


590 
600 
610 
620 


630 
640 
650 
660 
670 
680 


690 
700 
710 
720 
730 
760 
750 
760 
770 


rm=1:xp=6:yp=4:man$=CHR$(224):dog=f:stolen=0 
SYMBOL 249,8,8,8,8,8,8,8,8 

SYMBOL 241,09,09,9,9,255,09,09,9 

SYMBOL 242,09,09,9,9,15,8,8,8 

SYMBOL 243,0,9,9,9,248,8,8,8 

SYMBOL 244,8,8,8,8,248,0,0,0 

SYMBOL 245,8,8,8,8,15,0,0,0 


SYMBOL 246,8,12,13,14,12,12,8,8 

SYMBOL 247,8,12,1271413/1278,8 

SYMBOL 248,8,24,88,56,24,24,8,8 

SYMBOL 249,8,24,24,56,88,24,8,8 

SYMBOL 250,9,0,255,129,129,129,255,0 

SYMBOL 251,28,209,29,29,209,209,209,28 

SYMBOL 252,09,0,255,255,255,255,255,0 

SYMBOL 253,28,28,28,28,28,28,28,28 

SYMBOL 255,195,165,69,126,99,69,36,24 

ENT 1,12,-4,1 

ENT -2,=1000,609,=3009,40 

ENV 1,19,1,5,2,-4,1,2,-1,20 
windw$(1)=STRING$(2,2509):windw$(2)=CHR$(251)+CHR$(8 
)+CHR$(19)+CHR$(251)+CHR$(8)+CHR$(10)+CHR$(251) 
door$(1)=STRING$(2,252):door$(2)=CHR$(253)+CHR$(8)+ 
CHR$(109)+CHR$(253)+CHR$(8)+CHR$(19)+CHR$(253) 
switch$(1,09)=CHR$(246):switch$(1,1)=CHR$(247) 
switch$(2,0)=CHR$(248):switch$(2,1)=CHR$(249) 
gem$=CHR$(144):0bj$=CHR$(233):dog$=CHR$(255) 
hit$=CHR$(246)+CHR$(248)+CHR$(247)+CHR$(249)+CHR$(2 
52)+CHR$(253)+CHR$(250)+CHR$(251)+gem$+to0bj$+do0g$ 
RESTORE 3010 

FOR i=1 TO 5 

READ minxCi),minyC(i),maxxC(i),maxy(i) 

READ dir(i,1),dir(i,2),dir(i,3),dir(i,4) 

NEXT 

WINDOW #1,minx(rm)-1,maxx(rm)+1,miny(rm)-1,maxy(rm) 
+1 

WINDOW #2,1,14,1,25 

CLS #1:PAPER #09,8 

RETURN 

ORIGIN 50,590 

INK 6,24,12 

RESTORE 3060 

GOSUB 1280 

LOCATE 3,209 

PEN 5:PRINT">"; 
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1010 


1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 


PEN 1:PRINT"Escape Routes"; 

PEN 5:PRINT"<";:PEN 1 

LOCATE 19,2:PRINT"IN"; 

pause=3099:GOSUB 340 

CLS:LOCATE 1,3:INK 6,09 

PEN 1:PRINT man$;" You The Thief":PRINT 

PEN 2:PRINT LEFT$(door$(1),1);LEFT$(door$(2),1);" D 

oors":PRINT 

PEN 3:PRINT switch$(1,0);switch$(2,0);" LightSwitch 
(OFF)" 

PEN 3:PRINT switch$(1,1);switch$(2,1);" LightSwitch 
(ON)":PRINT 

PEN 4:PRINT LEFT$(windw$(1),1);LEFT$(windw$(2),1);" 
Windows":PRINT 

PEN 5:PRINT gem$;" Precious Gems":PRINT 

PAPER 1:PEN B:PRINT obj$;" Obstructions ":PEN 1:PA 

PER D:PRINT 

PEN 1:PRINT dog$;" The Dog" 

PEN 5:PRINT:PRINT:PRINT 

PRINT" Use Joystick":PRINT" Or Cursor keys" 

dummy=REMAIN(1) 

AFTER delay*4,1 GOSUB 340 


RETURN 

; l 

‘Generate Gems/obstacles 
' 

FOR room=1 TO 5 


gemr=INTC(RND*8)+2:o0bjr=INTC(RND*10)+5 
minx=minx(room):miny=miny(room):maxx=maxx(room):ma 
xy=maxy(room) 

FOR i=1 TO gemr 
x=INTC(RND*(maxx-minx+1))+minx 
y=INTC(RND*(maxy-miny+1))+miny 
gemx(room,i)=x:gemy(room,i)=y 
gems=gems+1 

NEXT i 

FOR i=1 TO objr 
x=INTC(RND*(maxx-minx+1))+minx 
y=INTCRND*(maxy-miny+1))+miny 


objx(room,i)=x:0bjy(room,i)=y 
NEXT i 
gems(room)=gemr:0bj(room)=objr 
NEXT room 

CLS 
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1570 


RETURN 

ON rm GOTO 1180,11909,12009,12109,12209 
RESTORE 2670:RETURN 

RESTORE 2740:RETURN 

RESTORE 2810:RETURN 

RESTORE 2880:RETURN 

RESTORE 2960:RETURN 

PAPER O:READ rm$:PAPER 8 

WINDOW #1,minx(rm)-1,maxx(rm)+1,miny(rm)-1,maxy(rm 
)+1:CLS #1 

PEN 1:LOCATE 1,1:PRINT SPACE$(19); 
LOCATE 1,1:PRINT "Room :";rm$; 

IF lights(rm) THEN INK 7,10:INK 8,109 ELSE INK 7,0: 
INK 8,9 

READ a$:IF a$="END" THEN RETURN 

IF a$="D" THEN 2180 

IF a$="W" THEN 2260 

IF a$="L" THEN GRAPHICS PEN 1:GOTO 2340 
IF a$="S" THEN 2420 

IF a$="F" THEN GRAPHICS PEN 6:GOTO 2340 
PRINT"***ERROR ***"; 

STOP 


'bisplay gems/objects 
' 


PEN 6 

FOR i=1 TO obj(rm) 

LOCATE objx(rm,i),0bjy(rm,i) 
PRINT obj$; 

NEXT 

PEN 5 

FOR i=1 TO gems(rm) 

LOCATE gemx(rm,i),gemy(rm,i) 
PRINT gem$; 


NEXT 

PEN 1:LOCATE xp,yp:PRINT man$; 
RETURN 

xf=0:yf=D:PEN 1 


IF INKEY(0)<>-1 OR INKEY(72)<>-1 THEN yf=-1 
IF INKEY(2)<>-1 OR INKEY(73)<>-1 THEN yf=1 
IF INKEY(8)<>-1 OR INKEY(74)<>-1 THEN xf=-1 
IF INKEY(1)<>-1 OR INKEY(75)<>-1 THEN xf=1 
IF xf=09 AND yf=9 THEN 1630 

LOCATE xp+txf,yp+tyf:ht$=COPYCHR$(#0) 
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1660 
1670 


1680 


1730 


1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 


1940 
1950 
1960 
1970 


IF ASCCht$)>239 AND ASCC(ht$)<246 THEN 1510 
IF ht$<>" " THEN 1660 


LOCATE xp,yp:PRINT " "; 
PAPER B:LOCATE 15,5:PRINT" ";:PAPER 8 
xp=xp+txf:yp=yp+tyf 


LOCATE xp,yp:PRINT man$; 

IF dog>@ THEN dog=dog MOD 2+1:IF dog=2 THEN 2550 
GOTO 1510 
hit=INSTRC(hit$,ht$):char=ASC(MID$C(hit$,hit,1)) 
ON hit GOTO 1690,16909,16909,1690,17509,17509,1850,190 
0,19709,20909,2650 

GOTO 1600 

IF hit>2 AND hit<5 THEN char=char-1 

IF hit<3 THEN char=char+1 

PEN 3:LOCATE xp+txf,yp+tyf:PRINT CHR$(char); 
lights(rm)=lights(rm) XOR 1 


IF Lights(rm) THEN INK 7,17109:INK 8,710 ELSE INK 7,0: 
INK 8,9 

GOTO 15710 

IF xf<>9 AND yf<>@ THEN 1630 


IF xf<09 THEN dir=4 ELSE IF xf>0 THEN dir=3 

IF yf<9 THEN dir=1 ELSE IF yf>Q@ THEN dir=2 

IF dir(rm,dir)=-1 THEN 16309 ELSE rm=dir(rm,dir) 
IF dog>@? THEN GOSUB 310 

IF dir=1 THEN xp=6:yp=maxy(rm) 

IF dir=2 THEN xp=6:yp=miny(rm) 

IF dir=3 THEN xp=minx(rm):yp=13 

IF dir=4 THEN xp=maxx(rm):yp=13 

RETURN 

IF xp>5 AND xp<8 THEN 1880 


IF xp<6 THEN dir=4 ELSE dir=3 
GOTO 1780 

IF yp>13 THEN dir=2 ELSE dir=1 
GOTO 1780 

PAPER 0:CLS:PEN 1 


LOCATE 3,3:PRINT"You have escaped"; 

LOCATE 9,5:PRINT"with"; 

IF gems=stolen THEN LOCATE 8,7:PRINT"ALL"; ELSE LO 
CATE 9,7 

PRINT USING " ##";stolen; 

PEN 5:LOCATE 9,9:PRINT"Gems"; 

dead=1:RETURN 

LOCATE xp,yp:PRINT" ";:xp=xp+txf:yp=yp+tyf 
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i=0 

i=i+1l 

IF i>gems(rm) THEN 1510 

IF gemx(rm,i)<>xp OR gemy(rm,i)<>yp THEN 1990 
IF i=gems(rm) THEN 2050 
gemx(rm,i)=gemx(rm,gems(rm)) 
gemy(rm,i)=gemy(rm,gems(rm)) 
gems(rm)=gems(rm)-1:stolen=stolen+t1 

MOVE 40909,159+(stolen*2),1,1:DRAW 5209,159+(stolen*2 
),1,1 

SOUND 129,248,109,12,0,1 

GOTO 1980 

noise=INT(RND*15) 

SOUND 1,3099,19,n0ise,0,0,10 

PAPER Q:LOCATE 15,5:PRINT"Crash ";:PAPER 8 

IF noise<19 OR delay=50 THEN 1630 
delay=delay-50 

dummy=REMAIN(1) 

AFTER delay*4,1 GOSUB 370 

GOTO 1639 


‘Draw doors 

' 

READ no,dr$ 

IF dr$="V" THEN dr=2 ELSE dr=1 
PEN 2 

pic$=door$(dr):GOSUB 2500 

GOTO 1280 

' 


‘Draw windows 
' 


READ no,wi$ 


IF wi$="V" THEN wi=2 ELSE wi=1 
PEN 4 

pic$=windw$(wi):GOSUB 2500 
GOTO 1280 

' 

' Draw Lines 

' 

READ x1,y1,x2,y2 


MOVE x1,y1,,9 

DRAW x1,y2,,0:DRAW x2,y2,,0 
DRAW x2,y1,,0:DRAW x1,y1,,09 
GOTO 1280 


continua sulla prossima pagina 


Appendice 3 Pagina 28 Alcuni programmi... 


2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 


2580 
2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
2700 
2710 
2720 
2730 
2750 
2750 
2760 
2770 
2780 
2790 
2800 
2810 
2820 
2830 


"Draw switches 

' 

READ no,sw$ 

IF sw$="L" THEN sw=1 ELSE sw=2 


PEN 3 

pic$=switch$(sw,09):GOSUB 2500 
GOTO 1280 

' 

'Print char 

' 

READ x,y:LOCATE x,y:PRINT pic$; 


fo=no-1:IF no>0 THEN 2520 
RETURN 

PEN 1:LOCATE dogx,dogy:PRINT" "; 
man$=CHR$(225) 

IF (dogx=xp AND dogy=yp) OR (dogx=xp+xf AND dogy=y 
p+yf) THEN 2650 

IF dogx<xp THEN dogx=dogx+1 

IF dogx>xp THEN dogx=dogx-1 

IF dogy<yp THEN dogy=dogy+1 

IF dogy>yp THEN dogy=dogy-1 
LOCATE dogx,dogy:PRINT dog$; 
SOUND 1,9,RND*40,19,1,2,31 

GOTO 1510 

PRINT"SNAP"; 

dead=1:RETURN 

DATA Hallway 

DATA L,64,308,226,5 

DATA D,2,H,6,3,6,22 


DATA D,2,V,4,12,9,11 
DATA S,1,L,4,11 

DATA S,1,R,9,14 

DATA END 

DATA Lounge 

DATA L,2,308,258,4 
DATA D,1,V,10,12 
DATA W,1,H,6,3 

DATA W,1,V,2,12 

DATA S,2,R,10,11,10,15 
DATA END 

DATA Dining room 
DATA L,2,308,258,4 
DATA W,1,V,109,12 
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28409 DATA 
2850 DATA 
2860 DATA 
2870 DATA 
2880 DATA 
2890 DATA 
2900 DATA 
2910 DATA 
2920 DATA 
2930 DATA 
2940 DATA 
2950 DATA 
2960 DATA 
2970 DATA 
2980 DATA 
2990 DATA 
3000 DATA 
3010 DATA 
3020 DATA 
3030 DATA 
3040 DATA 
3950 DATA 
3060 DATA 
3070 DATA 
3080 DATA 
3090 DATA 
3100 DATA 
3110 DATA 
3120 DATA 
3130 DATA 
317140 DATA 
3150 DATA 
3160 DATA 
3170 DATA 


3, 
3,4,9,21,-1,- 
3,6,13,21,1,0,-1 


3,0,9,01,°lye1z6,° 


L,64,308,4809,100 
F,250,98,294,102 
F,250,306,294,310 
F,390,94,4309,106 
F,390,302,430,314 
F,474,240,488,270 
F,474,124,488,154 
F,58,240,72,270 
L,226,308,322,180 
L,1609,180,489,100 
L,64,1809,160,100 
END 
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Indice 


(Si fa notare che tutti i numeri di riferimento forniti in questo indice 
corrispondono al capitolo e al numero di pagina; ad esempio 1.44 valetto 
come Capitolo 1 pagina 44). 


A 


IA 1.44 1.75 5.8 

ABS 3.3 

Accensione 1.4 1.5 

Accesso diretto 5.17 8.4 
AFTER 3.4 9.29 

Altoparlanti (esterni) 1.9 1.68 
Amplificatore (esterno) 1.9 1.68 7.39 
AMSDOS (messaggi di errore) 5.15 7.31 7.32 
AMSDOS 1.75 5.1 5.7 5.32 
AND (LOGO) 6.16 

AND 3.4 9.18 

Animazione 9.53 

.APV 6.43 

ARCTAN 6.13 

ASC 3.5 

ASCII (LOGO) 6.8 

ASCII 7.8 7.21 

ASM 5.37 

ASSIGN SYS 4.9 

ATN 3.5 

AUTO 2.10:3.5 

AUX 5.28 


B 


IB 1.44 1.75 5.8 

IBANKFIND 1.87 8.6 

BANK MANAGER 1.84 8.1 9.63 
IBANKOPEN 1.86 8.4 
IBANKREAD 1.87 8.5 
IBANKWRITE 1.87 8.4 

BASIC 1.22 3.1 7.32 9.7 

BF 6.8 

BIN$ 3.6 

Bit 9.9 
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BK 6.26 

BL 6.8 

BOOTGEN 5.33 
BORDER 1.49 3.6 7.6 
BREAK 3.6 
BUTTONP 6.35 

BYE 6.7 6.38 

Byte 9.9 


C 


CALL 3.7 

CAPS LOCK (Tasto) 1.17 
Caratteri 1.55 7.9 7.43 7.54 9.14 
Caratteri ASCII 7.9 7.9 9.15 
Caratteri definibili dall’utente 3.79 7.46 9.21 
Caratteri di controllo 7.3 9.51 
Caratteri di espansione 3.37 7.22 
Caratteri jolly 5.5 

Caricamento del programma WELCOME 1.21 
Caricamento di programmi 1.20 
Cassetta 1.7 1.76 4.11 5.12 5.13 5.14 5.35 
CAT (cassetta) 4.11 

CAT 1.43 3.7 

CATCH 6.40 

Cerchi 1.60 

CHAIN (cassetta) 4.12 

CHAIN 3.7 

CHAIN MERGE (cassetta) 4.12 
CHAIN MERGE 3.8 

CHANGEF 6.33 

CHAR 6.8 

Checksun 9.32 

CHR$ 1.55 3.8 9.16 

CINT 3.8 

CLEAN 6.22 

CLEAR 3.9 

CLEAR INPUT 3.9 

CLG 3.9 

CLOAD 5.13 5.14 5.35 
CLOSEIN 2.10 3.10 

CLOSEIN (cassetta) 4.14 
CLOSEOUT 2.9 3.10 
CLOSEOUT (cassetta) 4.15 

CLR (Tasto) 1.18 
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CLS 1.22 3.10 7.4 

CO 6.38 

Coda (suono) 3.52 3.77 7.7 9.44 
Codice macchina 7.7 

Codici di controllo 5.19 7.1 7.3 7.49 9.51 
Collegamento di una spina 1.1 
Colori 1.48 1.54 5.24 

Colori lampeggianti 1.52 3.75 
Comandi esterni 1.90 4.17 7.30 8.7 
Comandi Joystick (LOGO) 6.35 
Comandi per il suono (LOGO) 6.37 
Commessioni del computer 1.2 
CON 5.28 

Configurazione programmi 4.6 4.7 
Connessioni di alimentazione 1.1 
Connessioni di periferiche 1.7 7.38 7.39 7.40 7.41 
CONT 3.10 7.29 

.CONTENTS 6.42 

Contrasto 1.4 

Controllo di VOLUME 1.9 1.68 
Controllo HOLD vertical 1.4 

Copia dello schermo 1.46 3.71 5.6 
Copia di dischi 1.77 

Copia di file 1.45 1.77 5.11 5.13 5.14 
Copie dei dischi (Backup) 4.2 
COPY (Tasto) 1.28 

COPYCHR$ 3.11 

COPYOFF 6.20 

COPYON 6.20 

COS 3.11 

COS (LOGO) 6.13 

COUNT 6.9 

CP/M 2.2 1.82 4.10 5.31 5.33 6.2 
CP/M 5.17 

ICPM 1.39 5.9 

CREAL 3.11 

CRT 5.28 

CS 6.22 

CSAVE 5.13 5.14 5.35 

CT 6.20 

Cuffie 1.9 1.68 

CURSOR (LOGO) 6.20 

CURSOR 3.12 7.3 

Cursore copia 1.28 
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D 


DATA 3.12 7.27 9.31 
Data e ora di ultima modifica (file) 5.31 
DATE 5.31 

DDT 5.37 

DEC$ 3.13 

.DEF 6.43 

DEF FN 3.13 7.29 
DEFAULTD 6.33 
DEFINE 6.18 

DEFINT 3.14 

DEFREAL 3.14 

DEFSTR 3.15 

DEG 3.15 

DEL (Tasto) 1.16 
DELETE 3.16 

.DEPOSIT 6.42 

DERR 3.16 7.30 7.31 7.32 
DEVICE 5.27 5.28 

DI 3.17 9.30 

DIM 2.3 3.18 7.28 

IDIR 5.9 

DIR (CP/M) 1.40 5.21 5.29 
DIR (LOGO) 6.33 
DIRPIC 6.34 

DIRS 5.21 

DIRSYS 5.21 

IDISC 1.76 5.9 

Dischi 1.11 1.38 

Dischi 1.11 1.38 4.1 
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